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SECTION 1 

DATAPOINT2200 
REFERENCE MANUAL 



1.1 INTRODUCTION 



PART 1 
GENERAL FEATURES 

f. 60 frame per second refresh rate; 



The Computer Terminal Corporation Datapoint 2200 Is an 
integrated data system consisting of an alphanumeric key- 
board for data entry, a cathode ray screen for data display, 
two digital cassette recorders for bulk data storage, a general 
purpose digital computer for control, and a communications 
capability for interface with external devices and communi- 
cations facilities. 

Through programming of the control computer the Data- 
point 2200 may be used for an infinite varity of data pro- 
cessing applications. 

The achievement of a small computer with integrated key- 
board, display, storage and communications at such low cost 
now makes possible computer sophistication for applications 
not previously practical - particularly in the computer termi- 
nal/data entry/communications area. 

This manual describes the specific hardware details of the 
Datapoint 2200. For information regarding specific applica- 
tions the Datapoint 2200 Programmers' Guide and specific 
application manuals should be referred to. 

1.2 SYSTEM ELEMENTS 

There are four basic system elements in the basic Datapoint 
2200 plus the capability of interface to a number of external 
perpherial devices. 

This manual covers the basic elements (c.r.t., keyboard, pro- 
cessor, cassette tape decks) and one external device (commu- 
nications adaptor). 

1.3 CRT DISPLAY 

The Datapoint 2200 CRT Display provides the following 
features: 

a. 7" X 2-1/2" viewing area; 

b. 960 characters; 

c. 80 character by 1 2 line format; 

d. 4/32" X 3/32" character size; 

e. Entire 94 character ASCII set; 



g. 5 X 7 matrix character generation; 

h. 5 X 7 solid, blinking cursor, alternates with charac- 
ter, nondestructive; 

i. P31 green phosphor; 

j. Single control line erasure, frame erasure, and page 
roll-up; and 

k. Direct control of all c.r.t. functions by the 2200 
processor, providing tab, editing, form control, etc. 

1.4 KEYBOARD 

The integral keyboard provides a basic 41 key alphanumeric 
key group, an 1 1 key numeric group and five system con- 
trol keys. 

The keyboard provides a unique multi-key roll-over charac- 
teristic providing maximum ease of typing. Transfer of 
characters from the keyboard is under control of the 2200 
processor. An audible click providing an acoustical feedback 
to the typist is available under processor control. 

A programmable audio "beep" is also provided when it is 
desired to gain a typist's attention. 

1.5 PROCESSOR 

The integral processor provides all control functions and 
includes: 

a. 28 different instruction types; 

b. 7 addressable registers; 

c. 7 deep pushdown stack; 

d. 8 bit memory word length; 

e. Up to 8192 word memory; 

f. Complete parallel I/O system; 

g. Automatic power-up restart. 
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1.6 CASSETTE TAPE DECKS 

Two read-write tape decks are provided for program and 
data storage. The deck accepts Norelco-type cassettes and 
provides: 

a. 47 characters per inch density; 

b. Dual-capstan forward-reverse operation; 

c. Processor controlled data transfer, direction control, 
and high-speed rewind. 

1.7 COMMUNICATIONS ADAPTOR 

The communications adaptor is a unique feature of the Data- 
point 2200 system. There are four versions of the adaptor: 

a. EIA RS-232 interface for use with external data sets 
or peripherals; 

b. High-level keying interface for connection to telegraph- 
type communications channels or equipment; 

c. 103-type data set interface for direct connection to 
common carrier lines, and including automatic dialing 
and answering; 

d. 202-type data set interface with 150 bit/sec supervisory 
channel operation for direct connection to common 
carrier lines, and including automatic dialing and 
answering. 

The adaptor permits program selection of the desired bit 
rate, character length, and character set providing the most 
versatile communications capability yet provided for a 
remote terminal. 

1.8 GENERAL SPECIFICATIONS 

The Datapoint 2200 has the following general characteristics: 

a. 105-135 V. a. c, 60 cycle, 180 watts, power input; 

b. 47 pounds weight; 

c. 9-5/8" high, 18-1/2" wide, by 19-5/8" deep outside 
dimensions; 

d. 0° to 50°C (32° to 1 22° F), 1 to 90 percent relative 
humidity operation environment. 

1.9 OPTIONAL PERIPHERALS 

A number of optional peripherals are available (in addition 
to the communications adaptor) for use with the Datapoint 
2200 including a: 



a. 132 column, 30 c.p.s. impact page printer; and a 

b. IBM compatible magnetic tape deck. 

For further information on these devices reference should 
be made to their respective reference manuals. 
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PART 2 



BASIC PROCESSOR 



2.1 PROCESSOR ORGANIZATION 

The processor contained in the Datapoint 2200 is comprised 
of the Arithmetic/Logic Unit, 7 program accessible registers, 
2K to 8K words of read/write memory, an instruction deco- 
der and a seven-level hardware pushdown stack used in sub- 
routine type operations. 

2.2 ARITHMETIC/LOGIC UNIT 

The Arithmetic/Logic Unit is capable of processing both 
binary integers and logical operands. All arithmetic and logi- 
cal operations may take place between the A-register and 
any of the 7 program accessible registers (or between the A- 
register and memory). The A-register always contains 
the result of an arithmetic or togic operation, with the other 
register (or memory cell) being unaffected. Arithmetic and 
logic operations affect the Sign, Carry, Zero and Parity 
Flip-flops. 

2.3 PROCESSOR REGISTERS 

A - The Accumulator register is used to hold the result of 
all arithmetic and logical instructions. All data transfers 
into or out of the computer take place through this register. 
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A Register 



B, C, D, E - These are general purpose registers which may 
be used in conjunction with the Accumulator in arithmetic 
and logical operations. Each register may be loaded from or 
stored into memory or another register. When used in con- 
junction with the A and H, L registers, the B, C, D and E 
registers may function as indexes. 
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B, C, D, E Registers 



H, L - The H and L Registers are utilized to contain respec- 
tively the most significant portion (MSP) and least signifi- 
cant portion (LSP) of the address of a memory location 
being referenced. All memory reference instructions utilize 
these registers with the exception of CALL and JUMP 
commands. However, the H and L Registers may be used 
as general purpose registers when not being used as above. 



H (8 bits) 


L (8 bits) 



MSP of address LSP of address 
being referenced being referenced 

P - The program register or "Location Counter" contains 
the address of the next instruction to be executed. This 



register is stored in the pushdown stack upon the execu- 
tion of a "CALL" instruction and is loaded with the 
effective address upon execution of a "JUMP", "CALL" or 
"RETURN" instruction. The P register is 13 bits in length 
and is capable of addressing up to 8K of memory. 
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P (13 bits) 







I - The I register is the register which holds the "operation 
code" of the instruction currently being executed. The 
contents of I are gated through a decoding network to 
determine what operation.internal or external, is to be 
performed. 

2.4 MEMORY 

The basic Datapoint 2200 is supplied with 2048 eight-bit 
words of memory. Additional modules of 2048 words 
each may be incorporated with the total memory capacity 
of the processor being 8192 words. Each 2K memory is 
made up of 32 individual MOS shift registers with each one 
having a capacity of 512 bits or 64 eight-bit words. These 
registers are clocked at a rate of 1.2 MHz. Data is read out 
in bit serial fashion with one word taking 8 microseconds. 
During this period of time, two clock pulse times are 
available for the processor to perform any necessary gating 
or testing functions. 

The Datapoint 2200 memory might be likened to a drum 
type memory in some respects. It takes approximately 1/2 
millisecond for the memory to completely circulate. Thus, 
if the current instruction referenced a memory location for 
data access, there would be a 1/2 millisecond delay before 
that instruction could be completed. However, unlike a 
drum memory the MOS memory may be stopped during 
instruction execution so that each succeeding instruction 
may be read from memory without delay (in 8 usee). 

Physically, instructions require a variable number of cycles 
for completion. In the first cycle, the instruction is fetched 
from memory and decoded. If the instruction involves no 
memory reference, it is then executed within 8 microseconds 
for a total completion time of 16 microseconds. 

"Immediate" type instructions are the same as instructions 
requiring no memory reference and require a 16 usee 
interval for the operand fetch and execute cycle. Jump and 
Call type instructions require a variable amount of time for 
execution, depending on the difference between the old 
and new locations. 
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FIGURE 2-1 

DATAPOINT 2200 
BLOCK DIAGRAM 



2.5 PUSHDOWN STACK 

A unique feature of a machine this size is the incorporation 
into the processor's structure of a pushdown stack which is 
useful in any type of application which requires program 
subroutines. The stack autonnatically stores the contents 
of the P register upon execution of a "CALL" instruction 
and automatically restores P upon execution of a 
"RETURN". The stack is a group of "last-in/first-out" 
registers and has a capacity of 7 CALLS. Note that "CALLS" 
may be "nested", that is more than one CALL may be 
made before the execution of a RETURN. The execution 
of a "RETURN" will cause processor control to be given 
to the next instruction following the last executed CALL. 



Pushdown Stack 



Address 


of CALL 5 


Address 


of CALL 4 


Address 


of CALL 3 


Address 


of CALL 2 


Address 


of CALL 1 



Maximum 
Capacity of 
7 CALLS 



13 Bits 

2.6 CONTROL FLIP-FLOPS 

Also contained in the basic processor are four control flip- 
flops which reflect the state of the arithmetic logic unit 
and which may be tested through the execution of a condi- 
tional jump, call or return instruction. The flip-flop mnemo- 
nics with their associated functions are as follows: 



*ln the event of a compare instruction the contents of 
the accumulator are not changed; however, the control 
flip-flops reflect the equivalent of a subtract instruction. 

2.7 DATA FORMAT 

Data is represented in the Datapoint 2200 in the form of 
8-bit binary integers. 
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DATA WORD 

2.8 INSTRUCTION FORMATS (GENERAL) 

Instruction formats, dependent upon the operation to be 
performed, may be eight, sixteen or twenty-four bits in 
length. 

Type-1- register to register, memory reference, arithmetic, 
logical, shift instructions 



OPCODE 
8 bits 



Type- 2- immediate mode instructions 



OPCODE 
8 bits 



OPERAND 

8 bits 



Type- 3- JUMP & CALL instructions 



OPCODE 
8 bits 



ADDRESS 
16 bits 



Cf- Carry Flip-flop. Set when an arithmetic operation results 
in either a carry (add) or borrow (subtract).* The Carry Flip- 
flop also reflects the state of the most significant bit in the 
accumulator after completion of a shift right instruction. 
Likewise, it reflects the state of the accumulator least 
significant bit after completion of a shift left instruction. 

Zx-Zero Flip-flop. Set when the result of an arithmetic or 
logical operation is equal to zero.* 

Sf-Sign Flip-flop. This flip-flop reflects the state of bit 7 
in the accumulator after an arithmetic type operation.* 

Pf-Parity Flip-flop. Indicates the parity or "number of one 
bits" contained in the accumulator. If this flip-flop is set 
(true), the A register contains an odd number of one bits; 
if it is reset (false), the A register contains an even number 
of one bits.* 
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PARTS 



INSTRUCTION REPERTOIRE 



3.1 PRESENTATION FORMAT 

This section gives a detailed description of each of the Data- 
point 2200 instructions. The use and operations of each in- 
struction is presented as follows: 

FUNCTION: Mnemonic Code 

OPERATION: Symbolic representation of instruction 

description. 
OP CODE: Operation Code, expressed in octal. 

TIMING: Execution time. (Times are approximate). 

DESCRIPTION: Definition of function of the instruction. 



STACK 
P 

fc 
RR 

IM 

MR 

I 



7 6 



5 4 3 



2 1 



Logical "AND" operation 

Instruction counter (P) pushdown queue 

Program counter 

Flag flip-flop codes: Cf, Zf, Sf, Pf 

Register to Register 

Immediate (from P-H) 

Memory Reference (Contents of memory 

location designated by H, L) 

Instruction Register 

TABLE 3-1 



SOURCE AND DESTINATION CODES (s and d) 



" 2nd Modifier 

' 1st Modifier 

Instruction Type 



INSTRUCTION FORMAT: Explanation of the function of 
each part of the instruction word. 

NOTE 

Considerations in instruction use and further 
definition of function. 

Symbols and Abbreviations 

The following symbols and abbreviations are used in the in- 
struction format: 







SYMBOLIC 






s/d 


CODE 









A 


A Register 




1 


B 


B Register 




2 


C 


C Register 


^s/^d 


3 


D 


D Register 




4 


E 


E Register 




5 


H 


H Register 




6 


L 


L Register 


M 


7 


M 


Memory lo- 
cation speci- 
fied by con- 
tents of H&L 



( ) 



's 

•■d 

V 



the contents of 

is replaced by 

is transferred to 

is compared with 

8 bit arithmetic register (accumulator) 

8 bit general purpose registers 



8 bit register used to specify most significant 

portion of operand address 

8 bit register used to specify least significant 

portion of operand address 

memory location designated by contents of 

H, L 

one of the following register designators: A, B, 

C, D, E, H, L 

designates operand source register (s=0-7) 

designates operand destination register (d=0-7) 

Logical "OR" operation 

Logical "exclusive-OR" operation 



TABLE 3-2 
FLIP-FLOP CODE (fp) 





SYMBOLIC 




c 


CODE 


NAME 





Gf 


Carry 


1 


Zf 


Zero 


2 


Sf 


Sign 


3 


Pf 


Parity 
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LOAD IMMEDIATE: Lrj 

OPCODE: 0d6 TIMING: 16 usee. 

OPERATION: (P+D-^r^j, P+2^P 
DESCRIPTION: Transfers the contents of the mennory 
location immediately following the instruction, to the 
register specified by bits 3-5(d) of the instruction. 

INSTRUCTION FORMAT: 





P 






P+1 




7 6 


5 4 3 


2 1 


7 










d 


6 


OPERAND 



d: is the destination designator 
d=7: is not allowed 

NOTE 

1. The contents of P+1 are unchanged. 

2. None of the Flag Flip-flops are affected. 

3. Refer to Table 3-1 for destination codes. 



LOAD: LrjM, Lr^rs, LMrj 

OPCODE: 3ds TIMING: 16 usee, for register 

to register transfers, 520 usee, 
for memory reference. 
OPERATION: (M) -> r^ s=7, d<6 (Lr^M) 
rj s<6, d<6 (Lr^rs) 
M s<6, d=7 (LMrj) 
DESCRIPTION: Transfers the operand from the source 
specified by bits 0-2 of the instruction word to the destina- 
tion specified by bits 3-5 of the instruction word. 



(M) 

(rj)- 

(rs)- 



INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


3 


d 


s 



d: designates the destination of 
data. 

s: designates the source. If either 
s or d=7 a memory reference is 
indicated and the contents of 
registers H&L specify the address 
of the memory location. 

NOTE 

1. The data source is unaffected. 

2. s & d both = 7 results in a Halt instruction. 

3. None of the Flag Flip-flops are affected by execution 
of this instruction. 

4. s=d results in a NOP, except as stated in Note 2. 
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ADD IMMEDIATE: AD 

OPCODE: 004 TIMING: 16 usee. 

OPERATION: (A) + (P+1) -> A, P+2^ P 
DESCRIPTION: Adds to the contents of the A register the 
contents of the memory location immediately following the 
instruction, and retains the sum in the A register. Sets the Cf 
Flip-flop if ADD overflow occurs, otherwise resets Cf. 

INSTRUCTION FORMAT: 



ADD WITH CARRY 
IMMEDIATE: AC 

OPCODE: 014 TIMING: 16 usee. 

OPERATION: (A) + (P+1) + (Cf) ^ A, P+2 -> P 
DESCRIPTION: Adds the Cf bit and the contents of the 
location immediately following the instruction to the con- 
tents of the A register, and retains the sum in the A register. 
If add overflow occurs, the Cf Flip-flop is set, otherwise Cf 
is reset. 





P 






P+1 




7 6 


5 4 3 


2 1 


7 




ol 








4 


OPERAND 



INSTRUCTION FORMAT: 



2. 
3. 



NOTE 

The Sign, Zero and Parity Flip-flops 
will indicate the status of the A regis- 
ter at completion. 

The contents of P-^1 are unchanged. 
The Carry Flip-flop is cleared at the 
beginning of this instruction. 





P 






P-HI 




7 6 


5 4 3 


2 1 


7 










1 


4 


OPERAND 1 



NOTE 

1. The Sign, Zero and Parity Flip-flops 
will indicate the status of the A regis- 
ter at completion. 

2. The contents of P+^ remain unchanged. 



ADD: 
OPCODE: 20s 



ADrj ADM 



TIMING: 16 usee, if RR, 520 

usee, if MR 
OPERATION: (A) -i- (rj) ^ A or (A) + (M) ^ A 
DESCRIPTION: This instruction is identical to ADD 
IMMEDIATE with the exception of operand source. 

INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


2 





s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 



ADD WITH CARRY: 

OPCODE: 21s 



ACrj ACM 



TIMING: 16 usee, if RR, 

520 usee, if MR 
OPERATION: (A) + (Cf) + (r^) ^ A or (A) + (Cf) -i- (M) -> A 
DESCRIPTION: This instruction is identical to ADD WITH 
CARRY IMMEDIATE with the exception of operand 
souce. 

INSTRUCTION FORMAT: 

P 



7 6 


5 4 3 


2 1 


2 


1 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 
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SUBTRACT 
IMMEDIATE: SU 

OPCODE: 024 TIMING: 16 usee. 

OPERATION: (A) - (P+1) ^ A, P+2 ^ P 
DESCRIPTION: Subtracts the contents of the memory 
location immediately following the instruction from the 
contents of the A register, and retains the difference in the 
A register. The Cf Flip-flop is set if underflow occurs. 



SUBTRACT WITH 

BORROW IMMEDIATE: SB 

OPCODE: 034 TIMING: 16 usee. 

OPERATION: (A) - (P+1 ) - (Cf ) ^ A, P+2 -^ P 
DESCRIPTION: Subtracts the contents of the memory 
location immediately following the instruction and the Cf 
bit, from the contents of the A register. Sets the Cf bit 
if underflow occurs, otherwise resets Cf. 



INSTRUCTION FORMAT: 



INSTRUCTION FORMAT: 





P 




P+1 




7 6 


5 4 3 2 10 


7 










2 4 


OPERAND 





P 






P+1 




7 6 


5 4 3 


2 1 


7 




o| 





3 


4 


OPERAND 1 



NOTE 



NOTE 



1. The contents of P+1 is unchanged. 

2. The Zero, Sign, and Parity Flip-flops 
represent the status of the A register 
at the completion of this instruction. 



1. The contents of P+1 are unchanged. 

2. The Zero, Sign, and Parity Flip-flops 
represent the status of the A register 
at the completion of this instruction. 



■ s SUM 



SUBTRACT: SUrj 

OPCODE: 22s TIMING: 16 usee, if RR, 520 

usee, if MR 
OPERATION: (A) - (rj) ^ A or (A) - (M) -> A 
DESCRIPTION: This instruction is identical to SUBTRACT 
IMMEDIATE with the exception of operand source. 

INSTRUCTION FORMAT: 



SUBTRACT WITH 
BORROW: 

OPCODE: 23s 



SBrs SBM 



TIMING: 16 usee, if 
RR, 520 usee, if MR 
OPERATION: (A) - (r^) - (Cf) ^ A or (A) - (M) - (Cf) -* A 
DESCRIPTION: This instruction is identical to SUBTRACT 
WITH BORROW IMMEDIATE with the exception of 
operand source. 





P 




7 6 


5 4 3 


2 1 


2 


2 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 



INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


2 


3 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 
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AND IMMEDIATE: ND 

OPCODE: 044 TIMING: 16 usee. 

OPERATION: (P+1)yV(A) ^ A, P+2^ P 
DESCRIPTION: Forms the logical product of the contents 
of the A register with the contents of the memory location 
immediately following the instruction, and places the results 
in the A register. 



OR IMMEDIATE: OR 

OPCODE: 064 TIMING: 16 usee. 

OPERATION: (A) V (P+1) -> A, P+2 -> P 
DESCRIPTION: Forms the logical sum of the contents 
of the A register and the contents of the memory location 
immediately following the instruction, and places the 
result in the A register. 



INSTRUCTION FORMAT: 



INSTRUCTION FORMAT: 





P 






P+1 




7 6 


5 4 3 


2 1 


7 










4 


4 


OPERAND 





P 






P+1 




7 6 


5 4 3 


2 1 


7 










6 


4 


OPERAND 



NOTE 



NOTE 



1. The Carry Flip-flop will be reset upon 
completion of the operation. 

2. The Zero, Sign, and Parity Flip-flops 
will represent the status of the A regis- 
ter upon completion of the operation. 



The Carry Flip-flop will be reset at 
conclusion. 

The Zero, Sign, and Parity Flip-flops 
will represent the status of the A regis- 
ter at completion of the operation. 



SAMPLE OPERATION: 



SAMPLE OPERATION: 



(A Reg) 








1 


1 


(P+1) 





1 





1 


(A Reg) 











1 



(A Reg) 








1 


1 


(P+1) 





1 





1 


(A Reg) 





1 


1 


1 



AND: 

OPCODE 



NDrg, NDM 



24s TIMING: 16 usee, if RR, 520 

usee, if MR 
OPERATION: (A)A(rs) ^ A, or (A) A(M) ^ A 
DESCRIPTION: This instruction is identical to AND 
IMMEDIATE with the exception of operand source. 



OR: 

OPCODE: 26s 



ORrj ORM 

TIMING: 16 usee, if RR, 520 
usee, if MR 



OPERATION: (A) V {r^) ^ A, or (A) V (M) ^ A 
DESCRIPTION: This instruction is identical to OR 
IMMEDIATE with the exception of operand source. 



INSTRUCTION FORMAT: 



INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


2 


4 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 





P 




7 6 


5 4 3 


2 1 


2 


6 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 
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EXCLUSIVE OR 
IMMEDIATE: XR 

OPCODE: 054 TIMING: 16 usee. 

OPERATION: (A) V (P+1) ^ A, P+2-> P 
DESCRIPTION: The logical difference of the contents of 
the A register and the contents of the mennory location 
immediately following the instruction is formed, and the 
result replaces the contents of the A register. 



COMPARE 

IMMEDIATE: CP 

OPCODE: 074 TIMING: 16 usee. 

OPERATION: (A) : (P+1), P+2 ^ P 
DESCRIPTION: Compares the contents of the A register 
with the contents of the memory location immediately 
following the instruction. The flag flip-flops assume the 
same state as they would for a Subtract instruction. 



INSTRUCTION FORMAT: 



INSTRUCTION FORMAT: 





P 






P+1 




7 6 


5 4 3 


2 1 


7 




ol 





5 


4 


OPERAND 1 





P 






P+1 




7 6 


5 4 3 


2 1 


7 




o| 





7 


4 


OPERAND 



NOTE 



NOTE 



1. The Carry Flip-flop will be reset at 
conclusion. 

2. The Zero, Sign and Parity Flip-flops 
will represent the status of the A regis- 
ter upon completion of the operation. 



1. The contents of the A register are 
unaffected. 



SAMPLE OPERATION: 



(A Reg) 








1 


1 


(P+1) 





1 





1 


(A Reg) 





1 


1 






EXCLUSIVE OR: 

OPCODE: 25s 



XRrs XRM 



TIMING: 16 usee, if RR, 520 

usee, if MR 
OPERATION: (A) V {r^) ^ A, (A) V (M) ^ A 
DESCRIPTION: This instruction is identical to EXCLUSIVE 
OR IMMEDIATE with the exception of operand source. 



COMPARE: 

OPCODE: 27s 



CPrs CPM 



TIMING: 16 usee, if RR, 520 

usee, if MR 
OPERATION: (A) : (r^) or (A) : (M) 
DESCRIPTION: This instruction is identical to COMPARE 
IMMEDIATE with the exception of operand source. 



INSTRUCTION FORMAT: 



INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


2 


5 


s 





P 




7 6 


5 4 3 


2 1 


2 


7 


s 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 



s: specifies the operand source. 
Refer to Table 3-1 for source 
codes. 
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UNCOISIDITIOIMAL 
JUMP: JMP 

OPCODE: 104 TIMING: Variable* 

OPERATION: (P+1,P+2)^P 

DESCRIPTION: An unconditional transfer of control. The 
contents of P+1 represent the least significant portion of the 
address, while the contents of P+2 represent the most signi- 
ficant portion. 

INSTRUCTION FORMAT: 





P 






P+1 






P+2 




7 6 


5 4 3 


2 1 


7 







7 




o| 


1 





4 


LSP 


MSP 1 



OP CODE 



ADDRESS 



The three high order bits in the address are ignored, the re- 
maining 13 bits specify the address to which control is to be 
transferred. 

NOTE 

*Timing is variable dependent upon cyclic 
difference between instruction and effective 
address locations. 



JUMP IF CONDITION 
TRUE: 

OPCODE: 1(c+4)0 



JTfr 



TIMING: Variable if condition 
true, 24 usee, if condition false. 
OPERATION: If (fc=TRUE), (P+1 , P+2) -> P. Otherwise, 
P+3 -> P. 

DESCRIPTION: Examines the designated flip-flop. If set, 
transfers control to the address designated by the contents 
of the two memory locations immediately following the 
instruction. If the selected flip-flop is reset, executes the 
next sequentially available instruction. 



INSTRUCTION FORMAT: 





P 






P+1 






P+2 




7 6 


5 4 3 


2 1 


7 







7 




o| 


1 c+4 





LSP 


MSP 1 



OPCODE 



ADDRESS 



c: designates which flip-flop con- 
dition is to be tested. Refer to 
Table 3-2 for list of Flip-flop codes. 

NOTE 

1. The condition of the selected Flip-flop is 
unchanged by this instruction. 
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JUMP IF CONDITION 
FALSE: 

OPCODE: IcO 



JFfr 



TIMING: Variable if condition 
false, 24 usee, if condition true. 
OPERATiOiSI: If (f(,=FALSE), (P+1, P+2) -> P. Otherwise 
P+3 ^ P. 

DESCRIPTION: Examines the designated flip-flop. If reset, 
transfers control to the address designated by the contents of 
the two memory locations immediately following the instruc- 
tion. If the selected flip-flop is set, executes the next sequen- 
tially available instruction. 



INSTRUCTION FORMAT: 





P 






P+] 






P-i-2 




7 6 


5 4 3 


2 1 


7 







7 







1 


c 





LSP 


MSP 



OPCODE 



ADDRESS 



designates which flip-flop (condition) 
is to be tested. Refer to Table 3-2 for 
list of flip-flop codes. 



NOTE 

The condition of the selected flip-flop is 
unchanged by this instruction. 



SUBROUTINE CALL: CALL 

OPCODE: 106 TIMING: Variable 

OPERATION: P-H3 -> STACK, (P-H, Ph-2) ^ P 
DESCRIPTION: Transfers the address of the next sequen- 
tially available instruction to the Pushdown Stack, and 
transfer control to the address specified by the contents of 
the two memory locations immediately following the Op 
Code. 

INSTRUCTION FORMAT: 





P 






P-H 






P-i-2 




7 6 


5 4 3 


2 1 


7 







7 




o| 


1 





6 


LSP 


MSP 



ADDRESS 



NOTE 



The Stack is open-ended in operation. If it 
is overfilled, the deepest address will be lost. 
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CONDITIONAL SUBROUTINE CALL 



IF CONDITION TRUE: 

OPCODE: 1(c+4)2 



CTfr 



TIMING: Variable if condi- 
tion true, 24 usee, if condi- 
tion false. 
OPERATION: If (fc=TRUE), P-i-3-^ STACK, (P-i-1, P-i-2) ^ P. 
Otherwise, P-H3 ^ P. 

DESCRIPTION: Examines the designated flip-flop. If set, 
transfers the address of the next sequentially available instruc- 
tion to the pushdown stack, and transfers control to the 
address of the two memory locations immediately following 
the Op Code. If the selected flip-flop is reset, executes the 
next sequentially available instruction. 



INSTRUCTION FORMAT: 











P+1 






P-i-2 




7 6 


5 4 3 


2 1 


7 







7 







1 


c-i-4 


2 


LSP 


MSP 



ADDRESS 

c: designates which flip-flop (condition) 
is to be tested. 

NOTE 

1. The condition of the selected flip-flop is 
unchanged by this instruction. 

2. The stack is open-ended in operation. If 
it is overfilled, the deepest address will 
be lost. 

3. Refer to Table 3-2 for list of flip-flop codes. 
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CONDITIONAL SUBROUTINE CALL 



IF CONDITION FALSE: 

OPCODE: 1c2 



CFfr 



TIMING: Variable if condi- 
tion false, 24 usee, if condi- 
tion true. 
OPERATION: If (fc=FALSE), P-H3 -> STACK, (P+1, P+2) -* P. 
DESCRIPTION: Examines the designated flip-flop. If reset, 
transfers the address of the next sequentially available instruc- 
tion to the pushdown stack, and transfers control to the 
address of the two memory locations immediately following 
the Op Code. If the selected flip-flop is set, executes the next 
sequentially available instruction. 



INSTRUCTION FORMAT: 











P+1 






P+2 




7 6 


5 4 3 


2 1 


7 







7 







1 


c 


2 


LSP 


MSP 



ADDRESS 

c: designates which flip-flop (condition) 
is to be tested. 

NOTE 

1. The condition of the selected flip-flop is 
unchanged by this instruction. 

2. The stack is open-ended in operation. If 
it is overfilled, the deepest address will 
be lost. 

3. Refer to Table 3-2 for list of flip-flop codes. 
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RETURN 

TIMING: Variable 



SUBROUTINE 
RETURN: 

OPCODE: 007 

OPERATION: (STACK) ^ P 

DESCRIPTION: Transfer control to the address specified 

by the most recent entry in the Pushdown Stack. Deletes 

the nnost recent entry from the Stack. 

INSTRUCTION FORMAT: 



CONDITIONAL SUBROUTINE RETURN 





P 




7 6 


5 4 3 


2 1 








7 



NOTE 

1. The effect of attempting more "RETURN' 
than the Stack is capable of handling is 
undefined. 



IF CONDITION FALSE: 

OPCODE: 0c3 



RFfp 

TIMING: Variable if 
condition false, 16 usee, 
if condition true. 
OPERATION: If {f^= FALSE), Stack ^ P. Otherwise, 
P+1 ^P 

DESCRIPTION: Examines the designated flip-flop. If 
reset, transfers control to the address specified by the 
most recent entry in the stack. If the selected flip-flop 
is set, executes the next sequentially available instruction. 

INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


1 


c 


3 



c: designates which flip-flop 
(condition) is to be tested. 



CONDITIONAL SUBROUTINE RETURN 



IF CONDITION TRUE: 

OPCODE: 0(c+4)3 



RTfp 

TIMING: Variable if con- 
dition true, 16 usee, if 
condition false. 



OPERATION: If (f(;=TRUE), Stack ^ P. Otherwise P-H ^ P 
DESCRIPTION: Examines the designated flip-flop. If set, 
transfers control to the address specified by the most recent 
entry in the pushdown stack. Deletes the most recent entry 
in the stack. If the selected flip-flop is reset, executes the 
next sequentially available instruction. 

INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 


1 


c-i-4 


3 



c: designates which flip-flop (con- 
dition) is to be tested. 

NOTE 

1. The condition of the selected flip-flop 
is unchanged by this instruction. 

2. The effect of attempting more "RETURN" 
than the stack is capable of handling is 
undefined. 

3. Refer to Table 3-2 for list of flip-flop codes. 



2. 



3. 



NOTE 

The condition of the selected flip-flop 

is unchanged by this instruction. 

The effect of attempting more "RETURN" 

than the stack is capable of handling is 

undefined. 

Refer to Table 3-2 for list of flip-flop codes. 
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SHIFT RIGHT 
CIRCULAR: 

OPCODE: 012 
OPERATION: A 



m 



Wl 



SRC 

TIMING: 
Ao -^ A7, / 



16 usee. 
Cf 



DESCRIPTION: Shifts the contents of the A register right 
in a circular fashion. Shifts the least significant bit into the 
most significant bit position. Upon completion of the 
operation, the Carry Flip-flop is equal to the most signifi- 
cant bit. 

INSTRUCTION FORMAT: 





P 




7 6 


5 4 3 


2 1 





1 


2 



HALT: HALT 

OPCODE: 000,001,377 TIMING: Execution Stops 

OPERATION: 

DESCRIPTION: The computer halts. When the START 

buttom on the console is depressed, operation resumes at 

P+1. 

INSTRUCTION FORMAT: 



7 6 


5 4 3 


2 1 

















1 


3 


3 


7 



NOTE 

None of the flag flip-flops other than Cf 
is affected by this instruction. 



SHIFT LEFT 
CIRCULAR: 

OPCODE: 002 
OPERATION: A 



m 



A 



m-i-1' 



SLC 

TIMING: 
A7 -> Aq, a 



16 usee. 
7-Cf 



DESCRIPTION: Shifts the contents of the A register left 
in a circular fashion. Shifts the most significant bit into the 
least significant bit position. Upon completion of the opera- 
tion, the Carry Flip-flop is equal to the least significant bit. 

INSTRUCTION FORMAT: 



INPUT: INPUT 

OPCODE: 101 TIMING: 16 usee. 

OPERATION: (I/O Bus) -> A 

DESCRIPTION: Transfers the contents of the I/O Bus 
to the A register. 

INSTRUCTION FORMAT: 

P 



7 6 


5 4 3 


2 1 


1 





1 



7 6 


5 4 3 


2 1 








2 



NOTE 

None of the flag flip-flops other than Cf 
is affected by this instruction. 



NOP 

TIMING: 16 usee. 



NO OPERATION: 

OPCODE: 300 

OPERATION: P-H ^P 

DESCRIPTION: No instruction is executed. 



INSTRUCTION FORMAT: 
P 



7 6 


5 4 3 


2 1 


3 


1 
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EXTERNAL COMMAND: EX (exp) 

OPCODE: 121-177 depending TIMING: 16 usee, 
on the specific command being 
executed. 

OPERATION: Performs I/O control functions according 
to (exp) 

DESCRIPTION: These instructions perform the functions 
necessary for control of the I/O system and external de- 
vices. IVlany of these functions are specifically related to 
operation of particular devices. The device oriented com- 
mands for the Keyboard, CRT Display, Cassette Tapes, 
and Communications Interface are explained in the sections 
covering these devices. 

INSTRUCTION FORMAT: 



I J, 




7 6 


5 4 3 2 1 







1 


X X X X X 


1 






t 





OPCODE 



COMMAND CODE 



Table 3-3 is a list of External Commands used. For a detailed 
discussion of their use, reference should be made to Part 
4 (Input/Output Operations) and to descriptions of the 
separate external devices. 



TABLE 3-3 

EXTERNAL COMMANDS 

EX (exp) 



COMMAND 




OCTAL 






DEVICE 


NUMBER 


(exp) 


CODE 


COMMAND 


DESCRIPTION 


ADDRESS 


1 


ADR 


121 


Address 


Selects device specified by 


ALL 










A-register 






2 


STATUS 


123 


Sense Status 


Connects selected device status 
to input lines 






3 


DATA 


125 


Sense Data 


Connects selected device data to 
input lines 






4 


WRITE 


127 


Write Strobe 


Signals selected device that output 
data word is on output lines 






5 


C0M1 


131 


Command 1 


Outputs a control function to 
selected device 






6 


COM2 


133 


Command 2 


Outputs a control function to 
selected device 






7 


COM3 


135 


Command 3 


Outputs a control function to 
selected device 






8 


COM4 


137 


Command 4 


Outputs a control function to 
selected device 


ALL 


9 


— 


141 


(Unassigned) 


— 


— 


10 


— 


143 


(Unassigned) 


— 


— 


11 


— 


145 


(Unassigned) 


— 


— 


12 


— 


147 


(Unassigned) 


— 


— 
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TABLE 3-3 
EXTERNAL COMMANDS 
EX (exp) 
(Continued) 



COMMAND 




OCTAL 






DEVICE 


NUMBER 


(exp) 


CODE 


COMMAND 


DESCRIPTION 


ADDRESS 


13 


BEEP 


151 


Beep 


Activates tone producing 
mechanism 


341 


14 


CLICK 


153 


Click 


Activates audible click pro- 
ducing mechanism 


341 


15 


DECK1 


155 


Select Deck 1 


Connects deck 1 to I/O bus 


360 


16 


DECK2 


157 


Select Deck 2 


Connects deck 2 to I/O bus 






17 


RBK 


161 


Read Block 


Enables read circuitry and sets 
tape in forward motion 






18 


WBK 


163 


Write Block 


Enables write circuitry and sets 
tape in forward motion 


360 


19 




165 


(Unassigned) 







20 


BSP 


167 


Backspace 


Backs up the selected tape 


360 








One Block 


one record 






21 


SF 


171 


Slew Forward 


Sets selected tape deck in 
forward motion 






22 


SB 


173 


Slew Backward 


Sets selected tape deck in 
backward motion 






23 


REWIND 


175 


Rewind 


Rewinds the selected deck to 
beginning of tape 






24 


TSTOP 


177 


Stop Tape 


Halts motion of the selected 
tape deck 


360 
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TABLE 3-4 
INSTRUCTION REPERTOIRE 



OP 




OP 




OP 




CODE 


MNEMONIC 


CODE 


MNEMONIC 


CODE 


MNEMONIC 


000 


HALT 


050 




120 


JFS 


001 


HALT 


051 




121 


EX ADR 


002 


SLC 


052 




122 


CFS 


003 


RFC 


053 


RTZ 


123 


EX STATUS 


004 


AD 


054 


XR 


124 




005 




055 




125 


EX DATA 


006 


LA 


056 


LH 


126 




007 


RETURN 


057 




127 


EX WRITE 


010 




060 




130 


JFP 


Oil 




061 




131 


EX COM 1 


012 


SRC 


062 




132 


CFP 


013 


RFZ 


063 


RTS 


133 


EX COM2 


014 


AC 


064 


OR 


134 




015 




065 




135 


EX COM3 


016 


LB 


066 


LL 


136 




017 




067 




137 


EX COM4 


020 




070 




140 


JTC 


021 




071 




141 




022 




072 




142 


CTC 


023 


RFS 


073 


RTP 


143 




024 


SU 


074 


CP 


144 




025 




075 




145 




026 


LC 


076 




146 




027 




077 




147 




030 




100 


JFC 


150 


JTZ 


031 




101 


INPUT 


151 


EX BEEP 


032 




102 


CFC 


152 


CTZ 


033 


RFP 


103 




153 


EX CLICK 


034 


SB 


104 


JMP 


154 




035 




105 




155 


EXDECK1 


036 


LD 


106 


CALL 


156 




037 




107 




157 


EX DECK2 


040 




110 


JFZ 


160 


JTS 


041 




111 




161 


EX RBK 


042 




112 


CFZ 


162 


CTS 


043 


RTC 


113 




163 


EXWBK 


044 


ND 


114 




164 




045 




115 




165 




046 


LE 


116 




166 




047 




117 




167 


EX BSP 
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TABLE 3-4 

INSTRUCTION REPERTOIRE 

(Continued) 



OP 




OP 




OP 




CODE 


MNEMONIC 


CODE 


MNEMONIC 


CODE 


MNEMONIC 


170 


JTP 


240 


NDA 


310 


LBA 


171 


EXSF 


241 


NDB 


311 




172 


CTP 


242 


NDC 


312 


LBC 


173 


EX SB 


243 


NDD 


313 


LBD 


174 




244 


NDE 


314 


LBE 


175 


EX REWND 


245 


NDH 


315 


LBH 


176 




246 


NDL 


316 


LBL 


177 


EX TSTOP 


247 


NDM 


317 


LBM 


200 


ADA 


250 


XRA 


320 


LCA 


201 


ADB 


251 


XRB 


321 


LCB 


202 


ADC 


252 


XRC 


322 




203 


ADD 


253 


XRD 


323 


LCD 


204 


ADE 


254 


XRE 


324 


LCE 


205 


ADH 


255 


XRH 


325 


LCH 


206 


ADL 


256 


XRL 


326 


LCL 


207 


ADM 


257 


XRM 


327 


LCM 


210 


ACA 


260 


ORA 


330 


LDA 


211 


ACB 


261 


ORB 


331 


LDB 


212 


ACC 


262 


ORC 


332 


LDC 


213 


ACD 


263 


ORD 


333 




214 


ACE 


264 


ORE 


334 


LDE 


215 


ACH 


265 


ORH 


335 


LDH 


216 


ACL 


266 


ORL 


336 


LDL 


217 


ACM 


267 


ORM 


337 


LDM 


220 


SUA 


270 


CPA 


340 


LEA 


221 


SUB 


271 


CPB 


341 


LEB 


222 


sue 


272 


CPC 


342 


LEC 


223 


SUD 


273 


CPD 


343 


LED 


224 


SUE 


274 


CPE 


344 




225 


SUH 


275 


CPH 


345 


LEH 


226 


SUL 


276 


CPL 


346 


LEL 


227 


SUM 


277 


CPM 


347 


LEM 


230 


SBA 


300 


NOP 


350 


LHA 


231 


SBB 


301 


LAB 


351 


LHB 


232 


SBC 


302 


LAC 


352 


LHC 


233 


SBD 


303 


LAD 


353 


LHD 


234 


SBE 


304 


LAE 


354 


LHE 


235 


SBH 


305 


LAH 


355 




236 


SBL 


306 


LAL 


356 


LHL 


237 


SBM 


307 


LAM 


357 


LHM 
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TABLE 3-4 

INSTRUCTION REPERTOIRE 

(Continued) 



OP 




OP 




OP 




CODE 


MNEMONIC 


CODE 


MNEMONIC 


CODE 


MNEMONIC 


360 


LLA 


370 


LMA 






361 


LLB 


371 


LMB 






362 


LLC 


372 


LMC 






363 


LLD 


373 


LMD 






364 


LLE 


374 


LME 






365 


LLH 


375 


LMH 






366 




376 


LML 






367 


LLM 


377 


HALT 







NOTE 
OP Codes shown without Mnemonics are undefined. 
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PART 4 



INPUT/OUTPUT OPERATIONS 



4.1 GENERAL 

The versatile input/output capability of the Datapoint 2200 
permits it to communicate with external devices (such as the 
2200 communications adaptor) through a parallel I/O system. 
The keyboard, c.r.t. and tape decks that are an integral part 
of the Model 2200 perform all operations over the same I/O 
system as external devices. 

4.2 INPUT/OUTPUT INSTRUCTIONS 

Two types of instructions provide for I/O operations. One is 
the INPUT command (see section 3) which, upon execution, 
transfers whatever is on the input bus to the A-register. The 
second is the EXTERNAL command which is sub-divided 
into 24 separate command operations (8 of which are avail- 
able to devices physically external to the Model 2200). Each 
EXTERNAL command produces a strobe pulse which may 
be used for control external to the processor. The actual 
control functions assigned to each external command are 
listed in Table 3-3. 

4.3 INPUT/OUTPUT CABLE 

The parallel I/O cable carries data, input strobe, external 
commands, and power between the 2200 processor and 
external devices connected to it. A complete I/O system 
is structured by connecting external devices in partyline 
fashion as shown in Figure 2-1. The I/O cable contains 8 
input data lines, 8 output data lines, 1 input strobe line, 8 
(of the 24) external command lines, 1 clock line, and 7 
power and ground lines. 

4.4 I/O DATA LINES 

The data lines are broken into two groups. 8 lines are used 
for output and 8 lines are used for input. 

The data output lines are connected (at all times) to the 
A-register in the processor and are used to perform three 
basic functions: 

a. To transfer an address to select an external device 
(including the keyboard, c.r.t. and tape decks); 

b. To transfer commands to an addressed device; and 

c. To transfer data to an addressed device. 



The data input lines are strobed into the A-register upon 
execution of the INPUT instruction and used to perform 
two basic functions. 

a. To transfer status information from an addressed 
external device; and 

b. To transfer data from an addressed external device. 

As shown in Figure 4-1, input data or status from the data 
input lines is processed through input receivers and gated 
into the A-register. Once in the A-register data can be 
manipulated or stored as desired. Addresses, commands, or 
data that is to be transferred to an external device must 
first be loaded into the A-register. From the A-register it 
is transmitted through output devices onto the data output 
lines. The A-register, then, is used as a buffer register be- 
tween the 2200 processor and external devices for all input 
and output data transfers. 

4.5 INPUT STROBE 

The INPUT STROBE carries a signal (8 usee, pulse) from 
the processor to the external device to indicate that what- 
ever data is on the data input lines has been sampled and 
transferred into the A-register. The trailing edge of the 
pulse may be used by an external device to remove data 
from the data input line or to clear a status bit. The INPUT 
strobe is generated upon execution of the INPUT instruction. 

4.6 EXTERNAL COMMAND STROBES 

The eight EXTERNAL commands used by devices physi- 
cally external to the Model 2200 are given function 
assignments as follows: 
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INPUT 



INSTRUCTION 



V Y 



A-REGISTER 






INPUT 
GATES 



<- 



^ 



^ 



MODEL 2200 
PROCESSOR 



INPUT 
RECEIVERS 



OUTPUT 
DRIVERS 



<r- 



r> 



> 



-> 



-> 



-> 



8 DATA INPUT LINES 



8 DATA OUTPUT LINES 



INPUT STROBE 



8 EXTERNAL COMMAND LINES 



153.6 Kc CLOCK 



7 POWER AND GROUND LINES 



FIGURE 4-1 

I/O SYSTEM, FUNCTIONAL DIAGRAM 



TABLE 4-1 

EXTERNAL COMMANDS 

EX (exp) 



COMMAND 




OCTAL 






NUMBER 


(exp) 


CODE 


COMMAND 


DESCRIPTION 


1 


ADR 


121 


Address 


Selects device specified by A-register 


2 


STATUS 


123 


Sense Status 


Connects selected device status lines to data input bus 


3 


DATA 


125 


Sense Data 


Connects selected device data lines to data input bus 


4 


WRITE 


127 


Write Strobe 


Signals selected device that output data is on data 
output lines 


5 


C0M1 


131 


Command 1 


Signals selected device that a control word is on data 
output lines 


6 


COM2 


133 


Command 2 


Signals selected device that a control word is on data 
output lines 


7 


COM3 


135 


Command 3 


Signals selected device that a control word is on data 
output lines 


8 


COM4 


137 


Command 4 


Signals selected device that a control word is on data 
output lines 



Execution of an EXTERNAL instruction provides a pulse 8 
microseconds long. No functions are performed within the 
2200 processor during execution of an EXTERNAL instruc- 
tion. The interpretation of each of the EXTERNAL instruc- 
tions is as follows: 

a. Address. The address command (EX ADR) is a signal 
from the processor to all external devices to indicate 
that the information on the data output bus is to be 
interpreted as an external device address. Whenever 
an address command is executed all external devices 
should be disconnected from the I/O system except 
the device whose address appears in the A-register. 
(See paragraph 4.10 for discussion of address assign- 
ments). 

b. Sense Status. The sense status (EX STATUS) com- 
mand is a signal from the processor to the selected 
external device to place status information on the 
data input lines. (Note: External devices should be 
configured such that status is connected to the data 
input line whenever the device is first addressed. It 
is only necessary to use the EX STATUS instruction 
when it is desired to sense status after an EX DATA 
instruction has been used and a new address sequence 
has not been executed). 

c. Sense Data. The sense data (EX DATA) command is 
a signal from the processor to the selected external 
device to place its data on the data input lines. 



d. Write Strobe. The write strobe (EX WRITE) com- 
mand is a signal from the processor that data is 
present on the data output lines for the selected 
external device. 

e. Command 1 through Command 4. Command 1 
through Command 4 (EX C0M1, etc.) have meaning 
appropriate to the device selected. Reference should 
be made to a description of each device for specific 
function assignments. 

4.7 CLOCK LINE 

The clock line is crystal controlled 153.6 kilohertz square- 
wave that is available to external devices for timing 
purposes. 

4.8 I/O BUS ELECTRICAL SPECIFICATIONS 

All signals in the I/O System operate with a voltage swing 
of zero to +5 volts. Line drivers have a source impedance 
of approximately 470 ohms and line receivers have an input 
impedance in excess of 18,000 ohms and a decision thres- 
hold of +1.7 volts. Figure 4-2 illustrates a typical output 
line circuit. 

All logic levels are True (logical 1 ) for zero (less than +1.7) 
volts and False (logical 0) for +5 (greater than 1.7) volts. 

4.9 DATA TRANSFER OPERATION 



a. Data Output. Figure 4-3 illustrates the sequence of 
events that occur when data is transferred from the 
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2200 processor to an external device. A typical pro- 
gram sequence to execute a transfer is as follows: 



WDATA LA 0322 

EX ADR 

INPUT 

SRC 

JFC EXIT 

LAM 

EX WRITE 



Load device address into A- 
register 

Load device status into A-register 

Shift desired status bit into C 

flip-flop 

Exit if device not ready 

Load A-register with DATA 

Write Data to device 



Once a device is addressed it remains addressed until another 
device is addressed so that succeeding commands may be 
transmitted to a device without re-addressing the device. 
Transmitting a command to a device would follow a program 
sequence similar to a data transfer except that EX COMp 
would replace EX WRITE. 

b. Data Input. Figure 4-4 illustrates a sequence of events 
that occur when data is transferred from an external 
device to the 2200 processor. A typical program 
sequence is as follows: 



RDATA LA 0322 

EX ADR 

INPUT 

SRC 

SRC 

JFC EXIT 

EX DATA 

INPUT 



Load A-register with device 
address 

Load device status into A-register 
Shift status bit into C flip-flop 

Exit if device not ready 
Place data on input lines 
Load A-register with data 



4.10 DEVICE ADDRESS NUMBERING 

Address assignments in the I/O system provides for up to 16 
devices external to the 2200 processor. The address word is 
formulated such that the low-order four bits form the binary 
value for the address and the high-order four bits form the 
logical complement of the low order bits. For example device 
number 6 would have an address word as follows: 



A- Register 



1 








1 





1 


1 






v^ 



LOGICAL 

COMPLEMENT BINARY 6 

BINARY 6 



^ 



OCTAL 226 

This addressing system permits any device to be coded for 
its particular address with only a four-input gate strapped 
to those output lines that are set to one during the address 
command. In addition, all devices can be cleared by setting 
the A-register to all zeros and executing an EX ADR instruc- 
tion. 



Device addresses used in the Model 2200 are given in 
the following table: 

TABLE 4-2 

DEVICE ADDRESS ASSIGNMENTS 



DEVICE NUMBER BINARY OCTAL 



Cassette Tape 





11110000 


360 


Decks 








CRT/Keyboard 


1 


11100001 


341 


Communica- 


2 


11010010 


322 


tions Adaptor 








2200P Printer 


3 


11000011 


303 


2200T Tape 


4 


10110100 


264 


Transport 








Unassigned 


5 


10100101 


245 




" 


6 


10010110 


226 




" 


7 


10000111 


207 






8 


01111000 


170 






9 


01101001 


151 






10 


01011010 


132 






11 


01001011 


113 






12 


00111100 


074 






13 


00101101 


055 






14 


00011110 


036 




15 


00001111 


017 



4.11 I/O POWER AND GROUND LINES 

The Model 2200 provides several power supply voltages 
for use by external devices. Table 4-3 below lists the 
characteristics of each power and ground line. 

4.12 I/O SYSTEM CONNECTOR 

Connection to the I/O system is made through an Am- 
phenol 17-20500-1 connector. The mating I/O cable 
should have a 50-pin Amphenol 17-10500-1 connector. 

Table 5-5 lists the pin assignments. 
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DATA 
INPUT 
LINES 



STATUS FKOM 
SELECFLD DEVICE 



DATA 

OUTPUT 

LINES 




8 BIT ADDRESS 
WORD 



8-lUT DATA 
WORD 



ADDRESS 
COMMAND 



00 



WRITE 
COMMAND 



FIGURE 4-3 

TYPICAL DATA OUTPUT 

SEQUENCE 






+ 5 VOLTS I 




8KA 



+ 1.7 VOLT 
REFERENCE 



470A 




(TYPICAL 
INPUTLINE) 



+ 5 VOLTS 



4.7K/1 



i 



(TYPICAL 
OUTPUT LINE) 



I 



(SIGNAL 
GROUND) 



1 



I8KJ1 

AAAA 



+17 VOLT ,-j 
REFERENCE 



DATAPOINT 2200 PROCESSOR 



EXTERNAL DEVICE 



FIGURE 4-2 

I/O CABLE, ELECTRICAL CHARACTERISTICS 



TABLE 4-3 
I/O POWER AND GROUND LINES 



VOLTAGE 



MAX. CURRENT 



REGULATION 



-12 Volts 
- 5 Volts 
+ 5 Volts 
+12 Volts 
+24 Volts 
Power Ground 
Signal Ground 



0.5 amps 
0.1 amps 
3.4 amps 
0.5 amps 
0.1 amps 



±10% 

±5% 

±5% 

±10% 

±5% 



TABLE 4-4 
I/O CONNECTOR PIN ASSIGNMENTS 



ASSIGNMENT 



PIN NUMBER 



Data output 
(A Bus Outputs) 



Data Input 



(A Bus Inputs) 





1 

2 

3 

4 

5 

6 

7 



1 

2 

3 

4 

5 

6 

7 
Input Strobe (Read) 
Address Command 
Sense Status Command 
Sense Data Command 
Write Command 
Command 1 
Command 2 
Command 3 
Command 4 
153.6 KHz Clock 
-12v 
-5v 
+5v 
+12v 
+24v 
Ground (Power & Signal) 



44 
45 
46 
29 
30 
31 
32 
33 

1 

2 

3 

4 

5 

6 

7 
18 
12 
15 
13 
14 
19 
20 
21 
22 
23 
39 
24 
27 

10, 11 
25 
26 
40,41,42,43 



8, 9, 
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DATA 
INPUT 
LINES 



DATA 

OUTPUT 

LINES 



ADDRESS 
COMMAND 



INPUT 
STROBE 



SENSE DATA 
COMMAND 



FIGURE 44 

TYPICAL DATA INPLT 
SEQUENCE 



PART 5 



KEYBOARD 



5.1 GENERAL DESCRIPTION 

The keyboard on the Datapoint 2200 performs the functions 
of data entry and processor control. The keys are divided 
into three sections, each of which has it own function. 

Section 1 consists of 41 standard alphabetic, numeric and 
special character keys found in the ASCII character set. 
Figure 5-1 illustrates the keyboard layout. 

Section 2 consists of an 11 key matrix which is identical to 
a standard adding machine keyboard with the addition of a 
decimal point (period). The keys in this section are dupli- 
cates of certain keys found in Section 1 and are provided to 
facilitate entry of large amounts of numeric data. 

The keys in Section 3 are special function keys which exert 
control over the processor. Their names and associated 
functions are as follows: 

RUN Momentary contact switch, which when de- 

pressed, causes the processor to begin execu- 
tion of the instruction located at the address 
in memory currently addressed by the pro- 
gram counter. 

STOP Momentary contact switch which, when de- 

pressed, causes instruction execution to halt 
at the completion of the current instruction. 
Care should be taken when using this switch, 
because any tape operation which may be in 
progress will be aborted. 

KEYBOARD Momentary contact switch which sets a status 
bit that may be tested at any time by the 
processor. 



processor are from the keyboard and transfers from the 
processor are to the display). Following the address 
sequence the c.r.t. /keyboard status word can be loaded 
into the A-register by executing an INPUT instruction. 
Bit 1 of the A-register may be tested by the program to 
determine if a character is ready for transfer from the 
keyboard. Bits 2 and 3 will indicate if either the KEY- 
BOARD or DISPLAY control switch is pressed. 







CRT/KEYBOARD 
STATUS WORD 



•-CRT WRITE READY 
■KEYBOARD READ READY 
'-KEYBOARD CONTROL SWITCH 
DEPRESSED 
■- DISPLAY CONTROL SWITCH 
DEPRESSED 
•UNASSIGNED 



The External Commands associated with the operation of 
the keyboard are as follows: 

a. EX BEEP. This command produces a 1 500 Hertz 
tone for a duration of about 100 msec. The tone 
could be used as an error or ready signal to the 
keyboard operator. 

b. EX CLICK. This command produces an audible click 
which could be used to acknowledge receipt of a valid 
character when a key is depressed. 

c. EX COM 1 (Command 1 ). Presents a control word 
contained in the A-register to the keyboard. Bit 5 
of the control word controls the KEYBOARD 
switch light and bit 6 controls the DISPLAY switch 
light as follows: 



DISPLAY Momentary contact switch with a function 
similar to that of KEYBOARD switch. 
Either one or both of these switches may 
be depressed. 

RESTART Momentary contact switch which causes the 
processor to halt, rewind the system or pro- 
gram tape mounted on Deck 1, load and 
execute the first record found on tape. 

5.2 OPERATION 

The keyboard is addressed by the processor by loading the 
A-register with 341 g and executing an EX ADR command. 
(The crt display also uses this address. Data transfers to the 







CRT/KEYBOARD 
CONTROL WORD 



CRT "-UNASSIGNED 
CONTROL 
■-KEYBOARD LIGHT (1=on, O=off) 
•-DISPLAY LIGHT (1=on, O=off) 
•-UNASSIGNED 
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TABLE 5-1 
KEYBOARD CODING (ASCII) 



A-101 


a -141 


B-102 


b-142 


C-103 


c -143 


D-104 


d-144 


E-105 


e -145 


F-106 


f -146 


G-107 


g-147 


H-110 


h-150 


1 -111 


i -151 


J -112 


j -152 


K-113 


k-153 


L-114 


1 -154 


IVI-115 


m-155 


N-116 


n-156 


0-117 


0-157 


P-120 


p-160 


Q-121 


q-161 


R-122 


r -162 


S-123 


s -163 


T-124 


t -164 


U-125 


u-165 


V-126 


V -166 


W-127 


w-167 


X-130 


x-170 


Y-131 


y-171 


Z-132 


z -172 



0-060 


: -072 


1-061 


; -073 


2-062 


< -074 


3-063 


= -075 


4-064 


> -076 


5-065 


? -077 


6-066 


[ -133 


7-067 


~ -176 


8-070 


] -135 


9-071 


A -136 


Space-040 


- -137 


!-041 


@ -100 


"042 


( -173 


#043 


\ -134 


$-044 


' -140 


1-045 


1 -174 


6;-046 


} -175 


'-047 


Enter-015 


(-050 


Cancel-030 


)-051 


Backspace-010 


*-052 


Rubout (R.O.)-177 


-(-053 




,054 




-055 




.056 




/-057 
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PART 6 



CRT DISPLAY 



6.1 GENERAL DESCRIPTION 

The display unit on the Datapoint 2200 consists of a CRT 
capable of displaying 12 lines of 80 characters each, a 
character generator, 960 cells of refresh memory (refresh 
rate 60 Hz), and a group of registers utilized to position 
the cursor. Maximum character transfer rate to the CRT is 
60 characters per second. 

The character set utilized by the CRT display consists of 
the full ASCII set with both upper and lower case alphabe- 
tics and all numeric and special characters. 

6.2 OPERATION 

The CRT Is addressed and status tested in the same manner 
as the keyboard (see paragraph 5.2). Bit of the status word 
Indicates that the CRT is ready to accept data or commands. 
Characters are transferred to the screen by loading the A- 
register with the character to be displayed and executing 
an EX WRITE. The character will be displayed at the cur- 
rent cursor location. 

Control of the CRT is accomplished through the use of the 
three external commands- Command 1, Command 2, and 
Command 3. The functions performed by these commands 
are as follows: 



The cursor image may be turned on or off through the 
control word. The cursor position is the same in either 
case. The cursor image is automatically turned off when- 
ever the processor is in the HALT state. 

b. EX COM2 (Command 2) Positions the cursor to the 
horizontal character slot designated by the contents 
of the A-register. Character position 0-79io'0'1 ^^s' 
are valid. 

c. EX COM3 (Command 3) Positions the cursor to the 
line designated by the contents of the A-register. Line 
number O-Hiq (O-I33) are valid. 

In order to write a new character, the cursor must occupy 
that character's position on the screen. After the character 
has been written, the cursor should then be moved to the 
next horizontal (or vertical) position desired. The CRT 
Write Ready status bit must be true before positioning the 
cursor or displaying a character. 

Both the CRT and keyboard utilize the standard ASCII 
character set. (See Table 5-1). Any invalid character code 
will appear as a blank space on the CRT screen. 



a. EX C0M1 (Command 1) Transfers a control word 
contained in the A-register to the CRT. The appli- 
cable bit assignments and their functions are as 
follows: 



5 4 



1 



CRT/KEYBOARD 
CONTROL WORD 



— Unassigned 
*— Erase from cursor to end of line 
■— Erase from cursor to end of frame 
i-Roll-up 1 line 
^Cursor on/off (on=1, off=0) 
^Keyboard Light 
•—Display Light 
•—Unassigned 



The erase functions permit selective erasures on the screen 
by limiting erasures to those character positions following 
the current cursor position to the end of the line (or page). 

The roll-up function causes all displayed characters (not 
the cursor) to move up one line. The top line on the screen 
Is lost. 
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D 
D 
D 
D 
D 



% 

5 


a 

6 



s 


) 

9 



w 



SHFT 

ll"=c«lll|A 



on 



3Q 







B 


N 



DEL 



□mmm 



1_M_ 




< 




> 




7 







SHIFT ENTER 



7 
4 


8 


9 


5 


^1 








'1 


Nl 


3 





• 



1 


RESTART 





STOP 






1 


RUN 






KEYBOARD 



FIGURE 6-1 
KEYBOARD LAYOUT 



PART 7 



CASSETTE TAPES 



7.1 GENERAL DESCRIPTION 

The Datapoint 2200 contains two cassette tape recording de- 
vices for storage of programs and data. Since the hardware 
RESTART (section 5.1) uses the rear deck (number one), 
programs will typically be on it while data areas will be the 
front deck (number two). However, once the machine is 
initially loaded, either deck may be used for both purposes. 

Data on the Tape is organized by record (of any length). 
Records are written and read at 350 eight-bit characters per 
second with a tape speed of approximately 7.5 inches per 
second. See Table 7.1 for a list of the physical specifications. 

7.2 OPERATION 

Data Is recorded or read in bit serial fashion on one track. 
Each eight bit character is framed by three sync bits on 
either side of the character: 



- 


1 


xxxxxxxx 


01 


xxxxxxxx 


01 





Sync Character 1 Sync 
Code Code 



Character 2 Sync 
Code 



The appearance of the correct sync code indicates that the 
character is valid. Any other sync code causes special 
action to be taken on data reads. Note that the sync codes 
are valid for tape motion in either direction so the tape 
may be read backwards although in the reverse direction 
the data bits will apear reverse d (bit will be bit 7, 1 
will be 6 etc.) 

A record is a group of successive valid characters. An inter- 
record gap is indicated by the failure of the sync code to 
be zero one zero and all mark code, (ones): 



01 



xxxxxxxxlOI 



xxxxxxxx 



1 1 1 



Sync 
Code 



Valid 
Character 



Sync 
Code 



Invalid 
Character 



Sync 
Code 



Inter 

Record 

Gap 



Only valid characters will be presented as data from the tape 
unit. 

7.3 STATUS 

The cassette tape unit is addressed by the processor by 
loading the A-register with 360g and executing the EX 
ADR instruction. Following this sequence, the tape unit 



status can be loaded into the A-register by executing an 
INPUT instruction. The bit assignments are as follows: 



TAPE STATUS WORD 



L 



Deck Ready 
•- End of Tape 
•- Read Ready 
■-Write Ready 
_ Inter-Record Gap 
•— Unassigned 
"— Cassette in Place 
'~ Unassigned 



DECK READY 



END OF TAPE 
READ READY 
WRITE READY 



INTER-RECORD 
GAP 

CASSETTE IN 
PLACE 

7.4 CONTROL 



Deck ready will be set whenever the 
tape unit is ready to accept another 
command. (Only the TSTOP command 
should be issued if this bit is false). The 
tape will be stopped, a cassette in the 
selected deck and not wound to the 
clear leader at either end, and the head 
engaged when this bit is true. This bit 
should be checked after selecting a deck. 
End of Tape indicates that the cassette 
has run onto leader (in either direction). 
Read Ready indicates that the selected 
deck has read another character. 
Write Ready indicates that the selected 
deck is ready to write another charac- 
ter. 

Inter-Record Gap indicates the selected 
deck has come across an inter-record 
gap (invalid sync code). 
Cassette in Place indicates that a cassette 
Is physically in place in the selected deck. 



When the cassette tape unit is addressed the following Instruc- 
tions will control the action of the tape: 

a. EX TSTOP causes any motion of either deck to be 
stopped, any read or write operations to be terminated. 
When everything has settled, the ready status bit will 
come true and operations may be resumed. 

b. EX DECK1 causes deck one (rear) to be the currently 
selected deck. Before commanding a deck selection, 
care should be taken that the currently selected deck 
has completed all operations. 
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c. EX DECK2 causes deck two (front) to be the currently 
selected deck. Note the precaution in (b). 

d. EX RBK causes the currently selected deck to be set 
in forward motion and, after 70 msec, for the read 
circuitry to be enabled. The read ready status bit 
will come true upon appearance on the tape of the 
first valid character. Upon appearance of an invalid 
sync code, the inter-record gap status bit comes true 
and tape motion is automatically stopped. Note that 
this will happen only after at least one valid charac- 
ter has been found. Once the read ready status bit 
comes true, the character must be taken within 2.8 
milliseconds or it will be overwritten with the next 
one. The tape read hardware double-buffers incoming 
characters to allow the 2.8 msec character availability. 

e. EX BSP is similar to EX RBK except that tape motion 
is in the reverse direction so the data bits will be 
reversed. 

f. EX SF is similar to EX RBK except the tape is not 
stopped upon appearance of an inter-record gap, and 
if allowed to continue will start to read the next 
record on the tape. In this case, the read ready status 
bit will come true again after the first character of 
the next record is read. Only an EX TSTOP will stop 
the motion initiated by EX SF. 

g. EX WBK causes the currently selected deck to be set 
in forward motion and for all status bits except the 
write ready to go false. A character must then be 
presented within 2.8 milliseconds (the first character 
will be accepted at once due to the buffering in the 
tape hardware and then there will be a pause while 
the tape comes up to speed), at which time the write 
ready will go false until the writing circuitry is ready 
to accept another character. An end of record is a 
signalled to the hardware by withholding a character 
for a period of time longer than 2.8 milliseconds 
specified above. When this is done, the write ready 
will go false, an inter-record gap will be written, the 
tape motion will cease, and the deck ready status bit 
will come true again. 

h. EX REWIND causes the tape to be rewound to the 
beginning on the selected deck. Worst case rewind 
time is approximately 40 seconds. 

i. PUNCH TABS, on the Cassette Cartridge are used for 
"write protect" and "automatic restart". The punch 
tab on the left (as you face the terminal) inhibits the 
ability to write on tape, when punched. When the tab 
on the right is punched, it causes an automatic restart 
whenever a halt or power-up occurs. 



TABLE 7-1 
TAPE UNIT PHYSICAL SPECIFICATIONS 



Density 

Speed 

Recording Rate 

Capacity 

Start/Stop Time (Inter- 
Record Gap) 

Start/Stop Distance (Inter- 
Recrod Gap) 

Rewind Speed 

Rewind Time (max 300 ft.) 

Character Transfer Time 



47 characters/inch 

7.5 ips 

350 c.p.s. 

130,000 characters (typical) 

280 msec. 

2 inches 

90 ips 
40 sec. 
2.8 msec. 
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PARTS 



COMMUNICATIONS ADAPTOR 



8.1 GENERAL DESCRIPTION 

The 2200 Communications Adaptor is an external device, 
which when connected to the Datapoint 2200 Input/Output 
System permits asysnchronous serial data interchange to 
other remote systems or devices. 

The Communications Adaptor consists of three basic parts: 

a. The serial data transmitter and time base; 

b. The serial data receiver and time base; and 

c. The communications channel interface. 

The communications channel interface may be one of four 
types: 

a. An El A RS- 232 type interface; 

b. An isolated high-level neutral or polar telegraph Joop 
interface; 

c. A modem compatible with the Bel! System 103 type 
modems; 

d. A modem compatibel with the Bell System 202 type 
modems. 

8.2 OPERATION 

The serial data transmitter and receiver are addressed at the 
same time (the address of the first used communications 
adaptor is 3228 " ^^^ Table 4-2). Additional adaptors may 
be given previously unassigned addresses. 

To set the bit rate desired for the transmitter time base two 
successive EX COM3 instructions are used to transfer two 
8-bit masks from the A-register (See paragraph 8.6 for a 
discussion of time base mask words). For the receiver EX 
COM2 is used. 

To set the character length for the transmitter and receiver 
an EX COM4 command is executed with a character length 
mask from the A-register (see paragraph 8.7 for a discussion 
of character length mask words). 

The status of the communications adaptor is transmitted to 
the A-register with the following bit assignments: 



Communications Adaptor 
Status Word 

-Transmit Ready 



— Receive Ready 
Break Received 



•*CleartoSend 



'Carrier Present, Reverse Channel 



^Ringing Present 



— *Carrier Present, Main Channel 
'Dial tone present (originate mode) 
*Data coupler ready (answer mode) 



*Used with data set options. 

Communications Adaptor Status Bit Description 
Bit 0, Transmit Ready 

The "true" condition of this bit indicates that the serial 
transmitter is ready to accept a new character for trans- 
mission. Should another write command be issued to the 
Communications Adaptor while this bit is "false", i.e. 
transmitter NOT ready, tWe previous character will be 
written over. 

Bit 1, Receiver Ready 

The Receive Ready bit, in the true state, indicates the pre- 
sence of a new received character. A read command to the 
Communications Adaptor returns this bit to the false state. 
If a read command is not issued before another new charac- 
ter is received, the new character will replace the existing 
character and the status will remain true. 

Bit 2, Break Received 



The Break Received status bit simply indicates that the 
received data is in the "space" or "zero" condition for 
longer than one character time. 

Bit 3, Clear to Send 

The true state of Clear to Send status indicates that the 
data set (internal or external) is prepared to accept data 
for transmission. This bit has meaning only when an inter- 
nal or external data set is in used. 
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Bit 4, Carrier Present - Reverse Channel 



8.4 DATA INPUT 



This status bit has significance only when operating half- 
duplex with either an internal or external 202 type data set 
(modem). The true condition indicates that the reverse 
(supervisory) channel carrier is being received. 

Bit 5, Ringing Present 

The true condition of Ringing Present indicates that the 
ringing of an incoming call has been detected. This bit has 
.significance only when used with an internal or external 
(with proper options) data set. 

Bit 6, Carrier Present - Main Channel 



The true condition of this status bit indicates that the main 
channel carrier is being received. This status bit has meaning 
only when used with an internal or external data set. 

Bit 7, (1) Dial Tone Present (Originate Mode) 
(2) Data Coupler Ready (Answer Mode) 

(1) When originating a call, the true condition of this status 
bit indicates that a dial tone is present and dialing may pro- 
ceed; during dialing, the status will become false. Following 
dialing, and a 2 to 5 second delay, this bit will return to the 
true condition indicating connection to the telecommuni- 
cation network (but does not indicate the called number has 
answered). 

(2) When answering a call, the true condition of this status 
bit indicates that the data coupler is connected to the 
telecommunications network. 

8.3 DATA OUTPUT 

After addressing the communications adaptor transmission 
of each character is accomplished in the following manner: 

a. Input the status word and verify that status bit 0, 
Transmit Ready, is set to 1 indicating that the adaptor 
can accept another character. 

b. Load the A-register with the byte to be transmitted. 

c. Apply a write strobe (EX WRITE). Data present on 
the A-bus will be loaded into the data transmitter and 
data will be serially transmitted at the selected code 
length and bit rate. 



After addressing the communications adaptor, reception 
of each character is accomplished in the following manner: 

a. Input the status word and verify that status bit 1, 
Receiver Ready, is set to 1, indicating that a charac- 
ter has been received. 

b. Execute an EX DATA instruction. 

c. Execute an INPUT command, transferring the re- 
ceived character to the A-register. 

8.5 COMMAND WORD 

Control of the communications adaptor is accomplished 
through the use of a command word. The command word 
is transmitted to the adaptor by executing EX C0M1. 



7 6 5 4 3 2 10 



Communication Adaptor 
Command Word 



— •* Request to send (Transmit 
Carrier) 
•— Invert received serial data line 
' — ^*Supervisory channel on 
'- Invert the transmitted serial data line 
>— *Off-hook/Data Terminal Ready 
l-*Send 2025 Hz 
' — *Originate/Answer 
' — *Send dial pulses 



*Used with data set options 

Communication Adaptor Command Word Description 

Bit - Request to Send 

This command bit controls the transmit carrier of an internal 
or external data set. A "one" in this position turns on the 
transmit carrier and indicates to the data set that it must 
prepare for data transmission. 

Bit 1 Invert Received Serial Data Line 

A "one" in this position permits data to be received nor- 
mally when the received serial data line is inverted. 
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Bit 2- Supervisory Channel On 

This command is used only with a 202 type modem in half- 
duplex operation. A "one" in this command indicates to the 
modem that the supervisory (or reverse) channel will be 
operative, transmit or receive. 

Bit 3 - Invert Transmitted Serial Data 



A "one" in this command inverts the transmitted serial data. 
Bit 4 - Off-Hook 

A "one" must be placed in this bit position any time a 
telecommunication call is to be originated or answered. 
This command allows connection to be made to the tele- 
communication network with an internal modem and a 
Bell System Data Access Arrangement. When using an 
external modem, this command provides "Data Terminal 
Ready" to the external modem, i.e., the system is pre- 
pared for on-line communications. This command is used 
only for the cases described above. 

Bit 5 ■ Send 2025 



This command is used only with an internal 202 type mo- 
dem, half-duplex operation and "answer" mode. The only 
use of this command is described as follows: 

1.) following receipt of Ringing Present, Status Bit 5, 
the Off Hook Command, Command Bit 4, is set to a 
"one". 

2.) Next, Status Bit 7, Data Coupler Ready must 
become "true". 

3.) Send 2025 command must now be set to a "one" 
only for a period of 1/2 second to 3 seconds to in- 
form the calling data set of our response. 

Bit 6 - Originate 

This command is used only with internal data sets (modems). 
A "one" in this command instructs the modem that the 
system will originate a telecommunication call, A "zero" 
tells the modem the system is prepared to answer a telecom- 
munication call. 



1.) Off-Hook Command (Bit 4) is set to "one". 

2.) Status Bit 7 - Dial Tone Present becomes "true". 

3.) Bit 7, Bit 4 and Bit 3 (invert xmit), are now set 
to "one". 

4.) When the last dial pulse is completely transmitted. 
Bit 7 and Bit 3 must be returned to "zero". 

8.6 TIME BASE MASK WORDS 

Both time base generators are programmed for their respec- 
tive bit rates by the processor. Each time base is indepen- 
dently controlled to allow transmission and reception at 
different rates. 

After addressing the communication interface, two eight-bit 
mask words are loaded into the time base registers to 
synthesize the selected bit rates. As each respective byte is 
presented, a corresponding EX COM2 instruction must be 
executed to load the receive time base and an EX COM3 
instruction to load the transmit time base. 

These two bytes are combined to form a 16 bit word which 
is placed in a holding register. A counter is then set to the 
value in the holding register. This counter is incremented 
at the rate of 153,600 Hz. Each time the counter overflows, 
i.e., goes from all one to all zeroes, a pulse is generated and 
the counter is reset to the value in the holding register. The 
time between pulses represents 1/2 clock period or 1/2 bit 
time. Given a bit rate (bps), the following forpnula can be 
used to determine the number N to be entered into the 
holding register: 



N = 65,536 - 



76,800 
bps 



This number N may then be converted to a 16 bit binary 
number and separated into the two 8-bit mask words. 

The octal codes for some of the more frequently used rates 
are listed below: 



Bit 7- Send Dial Pulses 

This command is used only with internal data sets (modems) 
and is set to "one" only when dialing. Its use is described as 
follows: 
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BIT RATE 


1ST MASK WORD 


2ND MASK WORD 


1) 100* 


375 


000 


2) 110 


375 


106 


3) 220 


376 


243 


4) 440 


377 


121 


5) 150 


376 


000 


6) 300 


377 


000 


7) 600 


377 


200 


8) 1200 


377 


300 


9) 2400 


377 


340 


10) 4800 


377 


360 


11) 9600 


377 


370 



(Dialing) 



8.7 CHARACTER LENGTHS 

Character lengths for the transmit and receive sections and 
its output control bit are determined by a character length 
mask word which is transmitted to the communications 
adaptor with an EX COM4 instruction. 



2 |l [0[ Character Length 
Mask Word 

' Transmitted Character 

Length Mask 
Received Character Length Mask 
•— Output Control 
"— Unassigned 

The functions of the mask bits are given in the following 
tables: 



TABLE 8-1 
TRANSMITTED CHARACTER LENGTH MASK BITS 



MASK BIT 


START 


INFORMATION 


STOP 


CODE BIT 


POSITION 


UNITS 


UNITS 


UNITS 


POSITIONS 


210 








76543210 


000 




8 


1 


87654321 


001 




8 


2 


87654321 


010 




7 


1 


7654321 


oil 




6 


1 


654321 


100 




5 


1 


54321 


101 


— 


— 


— 


— 


110 


— 


— 


— 


— 


111 


— 


— 


— 


— 



When codes having 5, 6, or 7 information units are to be 
transmitted, the remaining high-order bits in the character 
byte must be coded to "1". 

When a two-unit stop pulse is required for characters having 
5, 6, or 7 information bits, the next larger character length 
is used; the remaining high-order bits (all coded 1) form the 
stop pulses. 

When received characters contain 5, 6 or 7 Information bits, 
the remaining low-order bits (as shown above) must be dis- 
regarded. 

One additional command bit. Bit 6 (output control) of the 
Character Length Mask Word, is used to control the EIA 
RS- 232 Transmitted Data and the High-Level Keyer Trans- 
mitted Data. A "one" in this command bit enables serial 
data to be transmitted only to the EIA RS-232 output or to 



1-41 



TABLE 8-2 
RECEIVED CHARACTER LENGTH MASK BITS 



MASK BIT 


START 


INFORMATION 


STOP 


CODE BIT 


POSITION 


UNITS 


UNITS 


UNITS 


POSITIONS 


543 








76543210 


000 




8 


1 or more 


87654321 


001 




8 


1 or more 


87654321 


010 




7 


1 or more 


7654321 X 


oil 




6 


1 or more 


654321 XX 


100 




5 


1 or more 


54321 XXX 


101 


— 


— 


— 


— 


110 


— 


— 


— 


— 


111 


— 


— 


— 


— 



the High Level Keyer. A "zero" in this command bit allows 
serial data to be transmitted only to an internal data set 
(modem). 

8.8 INTERFACE CONNECTOR 

This interface is provided through an Amphenol 17-10500-1 
connector. Pin assignements are as follows: 



INPUT/OUTPUT 

Output 

Output 

Input 
Input 

Direct 

Private 

Line 

Connection 

Input 

Output 



EAD 


FUNCTION 


1 


Protective Ground 


2 


Protective Ground 


3 


OH (Off Hook) 


4 


+25v 


5 


DA (Transmission Path 




Request) 


6 


R (Ring Indicator) 


7 


CCT (Data Coupler 




Ready) 


9 


DT (4 wire) 


10 


DT (2 wire) 


11 


OR (2 wire) 


12 


OR (4 wire) 


23 


Clear to Send (RS-232) 


24 


Transmitted Data 




(RS-232) 


28 


Signal Ground 


29 


Signal Ground 


32 


-I-5V 


33 


+5v 


40 


Request to Send 




(RS-232) 


41 


Received Data (RS-232) 


42 


Data Terminal Ready 




(RS-232) 



LEAD 


FUNCTION 


INPUT/OUTPUT 


44 


Supervisory Transmitted 
Data (RS-232) 


Output 


45 


Data Carrier Detector 
(RS-232) 


Input 


46 


Supervisory Received 
Data (RS-232) 


Input 


49 


Clock for 3300P 


Output 


50 


Transmit Bit Rate Clock 


Output 



Output 

Input 
Output 



8.9 HIGH LEVEL OPTION 

Interface with telegraph-type current loops is provided with 
the high level option. This option provides for completely 
isolated electronic neutral/polar output relay and a complete- 
ly isolated neutral/polar input relay. Loop voltage may be 
as high as 400 volts across the relay and as high as 1000 with 
respect to ground. 

Loop resistance and power is not included with the option. 

For further information, refer to the Datapoint 2200 
Installation Manual. 

8.10 103-DATA SET OPTION CHARACTERISTJCS 

The 103-Data Set option provides for full duplex data trans- 
mission for rates up to 300 bits per second with a signalling 
system that is compatible with the Bell System 103 series 
Dataphones. Connection to the common carrier lines would 
normally be made through a Bell System Access Arrangement 
type F-58118, CBT, or 1001B. Other connections are also 
possible where automatic dialing or answering is not re- 
quired. 
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The data set may be placed in either the answer mode or 
originator mode through the use of bit 6 of the communi- 
cations adaptor command word (see paragraph 8.5). Bit 
6 is set to for answer mode and 1 for originator mode. 
The request to send command bit (bit 0) is normally set 
to 1 with the 103 option to maintain the transmit carrier 
on. 

Operation of the automatic dialing and answering features 
discussed in paragraph 8. 12 and 8.13. 

Table 8-3 provides a summary of characteristics of the 
103 Data Set option. 

TABLE 8-3 

103 DATA SET OPTION CHARACTERISTICS 



TABLE 8-4 
202 DATA SET OPTION CHARACTERISTICS 



Originate Mode 
Carrier Frequencies: 



Answer Mode 
Carrier Frequencies: 



Keying Rate: 
Transmit Level: 
Impedance: 
Receive Sensitivity: 



Transmit: 
Receive: 

Transmit: 



Mark: 1270 Hz 
Space: 1070 Hz 
Mark: 2225 Hz 
Space: 2025 Hz 



Mark: 2225 Hz 
Space: 2025 Hz 

Receive: Mark: 1270 Hz 

Space: 1070 Hz 

Up to 300 bits per second 

Oto-IOdbm. 

600 ohms nominal 

-^5 to -30 dbm. 



8.11 202-DATA SET OPTION 

The 202 Data Set option provides for either full or half 
duplex data transmission for rates up to 1200 bits per 
second (1800 bits per second on conditioned private lines). 
This option is compatible with Bell System 202 series Data- 
phones (including supervisory channel operation) and In 
addition provides a 150 bit per second supervisory channel 
when used with another Datapoint 2200 Data Set option 
of the same type. Connection may be directly to private 
lines or to common carrier lines through a Bell System 
Access Assignment type F-581 18, CBT, or 1001 B where 
access to the telephone switched network is desired. 

Operation of the automatic dialing and answering are dis- 
cussed in paragraphs 8. 12 and 8.13 respectively. 

Table 8-4 provides a summary of characteristics of the 202 
Data Set option. 



Main Channel Frequencies: 



Supervisory Channel 
Frequencies: 



Special Command 

Frequency: 

Main Channel Keying 

Rate: 

Supervisory Channel 
Keying Rate: 
Transmit Level: 
Impedance: 
Receive Sensitivity: 



Mark: 1200 Hz 
Space: 2200 Hz 
Soft Turn-Off : 880 Hz 

Mark: 387 Hz 
Space: 470 Hz 
Soft Turn-Off: 330 Hz 

2025 Hz 

Up to 1200 baud (1800 baud 
on conditioned private lines.) 

Up to 1 50 baud 
Oto-IOdbm 
600 ohms nominal 
+5 to -30 dbm 



8.12 AUTOMATIC DIALING OPERATION 

When using the Datapoint 103 or 202 data set options with 
the Bell System Access Arrangement type F-581 18, CBT, 
or 10018 it is possible to automatically originate a call 
into the telephone switches network. The procedure for 
this function is as follows: 

a. Set bits 4 and 6 of the communications adaptor 
command word to 1 to provide an off-hook signal 
to the telephone network and to prepare the modem 
for originate operation. 

b. Test bit 7 of the communications adaptor status 
word for a 1 indicating dial tone present. 

c. Set the transmitter time base to 100 bits per second 
(see paragraph 8.6). 

d. Set the character length mask word to all zeros (ten 
bit length-see paragraph 8.7). 

e. Set bits 3 and 7 of the command word to 1 thus 
inverting the serial transmitter output and trans- 
ferring this output to the dial pulse keyer. 

f. Sequentially transmit the octal byte 360 for each 
dial pulse required for each number (see paragraph 
8.3-Data Output). 

g. Program approximately 1 second delay between each 
number and at the end of the last number transmitted. 
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h. Re-establish the correct code length and bit rate for 
data transmission and set command word bits 3 and 
7 to zero to restore the normal transmitter output. 

8.13 AUTOMATIC ANSWERING OPERATION 

When using the Datapoint 103 or 202 data set options with 
the Bell System Access Arrangement type F-581 18, CBT, or 
1001 B it is possible to automatically answer a call from the 
telephone switched network. 

Ringing is detected simply by testing bit 5 of the Communi- 
cations Adaptor Status Word, Response to ringing would be 
to set bit 4 of the Communications Adaptor Command 
Word to 1 to provide an off-hook signal to the telephone 
network. 

If the 103 Option is used Command Word bit is set to 1 
and bit 6 is set to turning on the transmit carrier and 
selecting the answer-mode carrier frequencies. 

If the 202 Option is used bit 5 of the command word is set 
to 1 for 1/2 to 3 seconds to transmit a 2025 Hz tone to 
disable echo suppressors and to inform the calling data set 
of out sequence in the telephone network, after which 
normal data transmissions occurs. 
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SECTION 2 

DATAPOINT2200 
OPERATING SYSTEM 



SECTION 2 



THE OPERATING SYSTEM 



READY 



The operating system is a conversational mode program for 
the Datapoint 2200 user to have a means to catalog, load, 
debug and run user programs and to provide other utilities 
important to the use of the 2200. All other programs dis- 
cussed in the "Programmers Manual" such as the Program 
Editor and the Assembler are programs which the user may 
catalog onto an operating system tape and call into use as 
required. 

The operating system itself is a relatively long program 
which is generally overlayed when user programs are called 
in from tape (unless they are less than 2K bytes in length and 
properly located). However, a family of resident utility 
routines is loaded with the operating system that may be 
used by user programs to simplify frequently used functions 
such as reading from the keyboard, writing to the CRT 
screen, reading and writing tape records, etc. The detailed 
use of the routines and the makeup of the operating system 
are described in Section 5— Advanced operating system 
command and subroutine usage. 

Section 1 will describe the command language for the 
operating system and does not require any particular pro- 
gramming skills. 

Start- Up Procedures 

When power is first applied to the Datapoint 2200, it is 
incapable of performing any useful function except to load 
a block of data from the rear tape cassette deck into the 
processor's memory and transferring control to it. In the 
operating system, this first block of data is called a LOADER 
and when control is transferred to it, it proceeds to the first 
check itself to see if it was loaded properly and then to load 
the next file on the same tape which is the rest of the operat- 
ing system program. This process can be executed at any 
time (assuming a proper program tape is in the rear deck) by 
pressing the RESTART key on the right hand side of the 
2200. 

This first block of data can be used to load programs other 
than the operating system and is generally useful for all 
applications of the 2200. In order to use the operating system, 
a full 8K bytes of memory must be provided in the 2200, but 
the loader alone can be used with any size memory. 

When an operating system program tape is loaded, the first 
thing that appears on the screen is: 

COMPUTER TERMINAL OPERATING SYSTEM 



At this point, any of the operating system commands dis- 
cussed below may be typed into the 2200. 

Each command has to be in the form of a word followed by 
the ENTER key, or a word followed by a space, or a dash 
and a name, or a modifier. Each of the following are valid 
operating system commands: 

CATALOG 
REPLACE RST4 
REPLACE-RST4 
RUN* 

Only the first three letters of a command are actually decoded 
so that the following are valid commands: 

CAT 
REP RST4 

If an invalid command is typed the system responds with: 

WHAT? 

Operating System Commands: 

CATALOG 

The CATALOG command will print out a list of programs 
currently available on that particular operating system tape. 
Up to 14 programs may be cataloged on a tape under this 
system and the order that they appear on the tape is the 
order their names appear on the screen when the catalog 
command is given. A typical catalog response might be: 

CATALOG 

RST4 CODER BANDIT ANNUIT 

READY 

Which would indicate that four programs are logged onto 
the tape. 

NAME 

The NAME command allows any program in the system to 
have its name changed. For example, the program named 
BANDIT in the above example can be changed to GAME 
with the command: 

NAME-BANDIT, GAME 
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Names may have any combination of letters and digits up to 
six characters in length and beginning with a letter. All of the 
following are valid program names: 

BOB 
R 12345 
A 
NAME 

RUN 

The RUN command causes the operating system to position 
the cassette tape to the program named in the run command, 
load the program into the 2200 memory and transfer control 
to it. The program being run may overlay part or all of the 
operating system. If it does, returning to the operating sys- 
tem can only be done by reloading it. This can be done by 
using the restart switch or by program control (See Section 5). 

A run command would appear like this: 

RUN-BANDIT 

A program that has not been logged onto the system tape 
may be run by placing an assembled form of the program on 
the front deck and typing: 

RUN* 



IN 



The IN command causes a program to be cataloged onto the 
operating system tape. The program must be assembled and 
the assembled program tape placed on the front deck. The 
IN command is typed giving the name to be assigned to the 
program as shown here: 

IN RST4 



Then the processor will stop. The stop key on the right hand 
side of the keyboard will be lighted. If there is a tape in the 
front deck that can be recorded on, press the run key on the 
right hand side and the system will proceed to delete the 
named program for you. 

This will generally take a little time. When the system is 
through it will write READY on the screen. 



REPLACE 



The REPLACE command allows a program already in the 
system catalog to be deleted and a new program to be put 
in its place in the same order on the tape. The new program 
does not have to be the same length as the old one. Again, 
this command takes time to execute due to the amount of 
"shuffling" of tape files to get everything in place. 

AUTO 

The AUTO command allows one of the programs in the sys- 
tem library to be marked for an automatic RUN whenever 
the operating system is restarted. Once a program has been 
named in an auto command, it may be cleared by typing a 
MANUAL command. The automatic feature may be over- 
ridden during a restart by holding down the KEYBOARD 
key on the right hand side of the keyboard. 

The automatic program calling feature is particularly valuable 
when the program is to be run in an unattended situation. If 
the knock-out tab on the back of the operating system tape 
is removed then whenever power is reapplied or the processor 
is halted for any reason (including a programming halt), an 
automatic restart is executed and, of course, the program 
named in the auto command is reloaded and given control. 

If the command AUTO is typed without a name then the 
system will respond with: 



The operating system tape (on the rear deck) will position 
itself to the end of its program library and will then copy the 
program from the front deck into place and add its name and 
position to the system catalog. 

DELETE 

The DELETE command causes the program named in the 
command to be removed from the system library. Unless 
the program being deleted happens to be the last program 
in the library, a SCRATCH tape will be required in the front 
deck to copy part of the library out and back to the system 
tape to CLOSE-UP the space. In this case, when the com- 
mand is entered, the system will write a message back: 

FRONT TAPE SCRATCH? 



NAME REQUIRED 

If a program is already named in an auto command then the 
system will respond with: 

AUTO SET TO (PROGRAM NAME) 

MANUAL 

The MANUAL command will delete any program from the 
auto mode. 

OUT 

The OUT command causes any named program to be copied 
to the front tape causing any data already on the front tape 
to be lost. This copy may then be cataloged onto some other 
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system tape or be saved for some future use. When using 
the OUT command the system will write FRONT TAPE 
SCRATCH? onto the screen and the processor will halt. 
If you have a usable tape in the front deck, then press the 
run key on the right hand side of the keyboard and the 
system will continue. 

If the command OUT $ is typed, then the entire operating 
system including the library is copied to the front deck. If 
the command OUT * is typed, then the loader and the 
library is copied to the front deck but the operating system 
is deleted. This permits a program or family of programs 
to be used on a Datapoint 2200 with less than the full 8K 
of memory. (See Section 5 for details). 

PREP 

The PREP command causes the tape in the front deck to be 
rewound and a NULL file to be written at the beginning of 
the tape, effectively ERASING the tape and making it 
ready for use by operating system tape routines. The operat- 
ing system commands that write on the front deck execute 
the PREP function automatically, however, USER PRO- 
GRAMS WRITING DATA TO THE TAPE MAY REQUIRE 
THE TAPE TO BE "PREPed" IN ADVANCE. 



HEX 

The HEX command allows programs generated on other 
machines that follow a specified hexadecimal format, to be 
loaded into the Datapoint 2200. Users will not normally be 
concerned with the HEX command. (See Section 5 for 
details). 

DEBUG 

The DEBUG command transfers program control to a small 
sub-program within the operating system that is used as a 
programming aid to debug and modify programs that are 
loaded into the 2200 memory. The debug sub-program allows 
you to write the contents of memory locations to the screen, 
modify memory locations, load programs into memory from 
the library or from the front deck, transfer control to parts of 
a program in memory and TRAP register values upon return 
to the debug program. Instructions on the use of the debug 
sub-program are given in Section 5.- 
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ASSEMBLER SOURCE CODE EDITOR 

The assembler source code editor program provides for the 
preparation and editing of source data tapes in an assembler 
compatible format. 

The editor program is called by the Computer Terminal 
Operating System (CTOS), if it is cataloged therein, by 
typing the following command: 

STEP1 

RUN EDIT 

STEP 2 

a) When the editor has been loaded, the following message 
will appear on the screen: 

Compressed Source Code Editor 

Edit (E) or Convert (C)? 

Type 'C only if you have a tape generated by EDIT (1.1). 
This version of the Editor generated unblocked string rec- 
ords (using SSFW$). The present version generates "com- 
pressed source" records (using SNFW$). 

If conversion is required, type 'C. The following message 
will appear: 

PLACE SYMBOLIC TAPE IN FRONT DECK- 
WHEN READY PRESS RUN 

Place the old tape in the front deck and push RUN. A con- 
verted file will be generated in the scratch area of the CTOS 
tape. When the 1st pass of the conversion is complete, the 
following message will appear: 

PLACE SCRATCH TAPE IN FRONT DECK- 
WHEN READY PRESS RUN 

To protect your original tape, use a new tape to record the 
new compressed source code. Place the new tape in the front 
deck and press run. 

The conversion process may be repeated for several tapes. 

The Editor will now accept only compressed source tapes. 

b) Type 'E' to EDIT, this message will appear on screen: 

TYPE (:NEW,:OLD, ORrDUPLICATE)? 
The meaning of the possible responses are as follows: 



(NOTE:) All commands to the editor must begin with colons. 



:NEW 



:OLD 



:DUPLICATE 



Indicates that the tape on the front deck 
is to be treated as a new source data tape. 
Any old data on this tape will be written 
over by the editor program. 

Indicates that the front deck contains a 
tape with assembler source data on it. 
The operator will be allowed to edit this 
tape, changing only those lines which 
the operator specifies. 

Indicates to the editor that it should 
copy the contents of the scratch file 
to the source data tape. This provides 
copies of a single source data file. It 
also provides for recovery capability 
should a system failure occur during 
the editing process. See Step 4, Recov- 
ery Procedures. 



STEP 3 

a) If the response in Step 2 was :NEW the following ques- 
tion will appear on the screen: 

NEW NAME? 

The operator may now enter a character string of up to 40 
characters. This text will become the first record of the source 
data tape and will appear as part of a comment line in the 
assembled text. 

b) If the response in Step 2 was :OLD the editor will read the 
header record from the source data tape (front deck) and 
display that header on the screen in the following format: 

OLD NAME IS XXXX XXXX...XXXX 

This old name header is also written to the scratch file and is 
retained as the header record for the source tape. 

c) If the response in Step 2b was :DUPLICATE the editor 
will return to Step 2b after the copying operation has been 
completed. See Step 4, Recovery Procedures. 

After a) or b) above has been completed, a "READY" message 
will be written on the screen and the cursor will appear at the 
beginning of the bottom line. The editor is now ready to 
accept new text data or a command. In order to enter text, 
simply type the desired text. Upon pressing the enter key, 
the typed line will be rolled up on the screen one line and 
the cursor will reappear on the bottom line and accept 
another text line or a command. When a line of text rolls off 
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the top of the screen, it is written to the scratch file. Lines 
will be written to the scratch file in the same order as they 
appear on the screen, the top line being first in the file. 

Commands which can be entered, and their respective func- 
tions, are listed below. Command lines are distinguished from 
text lines by a leading colon; therefore, it is necessary to be- 
gin any command by typing a leading colon. 

The "pointed line" referred to by some command descrip- 
tions below, is the line currently being pointed to by the 
visible pointer at the left side of the screen (col. 0). The 
"point's" vertical position is controlled by the keyboard/ 
display keys. Specifically, pressing KEYBOARD causes 
the pointer to move up one line, pressing DISPLAY moves 
it down one line. Motion in either direction is circular 
around the screen. (It wraps around). 

Commands may be entered from the bottom line only and 
must be preceded by a colon (:). 

The functions available and their respective descriptions 
are listed below: 

MANUAL (Not a typed command). 

SEARCH MANUAL SEARCH is like a continu- 

ing find of the very next line. That is, 
searching continues line at a time, with 
the next new line going to the eleventh 
line and the screen rolling up. It is un- 
like a find in that the screen isn't 
cleared for each new line acquired. It 
is useful for manually scanning through 
the data to bring to the screen and, 
therefore, into a position to edit the 
data of interest. MANUAL SEARCH is 
achieved by holding down the KEY- 
BOARD and DISPLAY keys simulta- 
neously. While held down, the search 
will proceed until end of file at which 
point the keys will become inoperable. 

:FIND <TEXT> Where <text> represents n characters 
of text data. The editor searches the 
source data tape for the first match 
with the desired n— <text> characters. 
When the desired line is found it is dis- 
played on the bottom line of the screen. 
The search is circular through the data 
files. If no match is found the text 
which occupied the bottom line at the 
time the command was issued is re- 
stored. Leading blanks on data-lines 
are ignored during the search. A FIND 
or EOF in progress can be stopped by 
the manual search operation. 



:COPY or :COP The pointed line is copied to the bot- 
tom line and is simultaneously deleted 
from its previous location. The cursor 
will occupy the pointed line and will 
accept new text at this position. Striking 
the <enter> key returns the cursor to 
the bottom line and rolls the screen up 
one line. 

:DELETE or :DEL The pointed line is deleted from the 

screen and the scratch area. The cursor 
will occupy the pointed line and will 
accept new text at this position. 
Striking the <enter> key returns the 
cursor to the bottom line. The screen 
is not rolled up. 



:INSERTor :INS 



:EOF 



:END 



The pointed line and all lines above 
it are rolled up one line. The cursor 
will now occupy the blank line 
created and is ready to accept the 
new text. Striking the <enter> key 
returns the cursor to the bottom line. 

The editor will search the source data 
tape for an end-of-file. Upon finding it, 
the last 1 1 text lines are on the screen 
and the cursor occupies the bottom 
line ready to accept new text or com- 
mands. A FIND or EOF in progress 
can be stopped by the manual search 
operation. 

Causes the screen and the remaining 
source data to be copied to the scratch 
file. The scratch file is then copied to 
the source data tape. 

The same as :END except that all data 
on the source tape which follows the 
current screen data is deleted. 

Cause all lines between the top of the 
screen and the pointer, inclusive, to be 
deleted from the screen and the scratch 
area. The cursor will occupy the pointed 
line and will accept new text at this 
position. Striking the <enter> key 
returns the cursor to the bottom line. 
The screen is not rolled up. 



STEP 4 

Recovery procedures using the :DUPLICATE command can 
be implemented should the edit program be aborted during 
its execution without benefit of having completed all 
necessary copying and end of file writing. 



: END/DEL 



:SCRATCH or 
:SCR 
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Causes of difficulties which could require such action are: 

1. Power failure during execution of the program 

2. Turning off the power execution of the program 

3. Striking the restart switch during execution 

4. Encountering unrecoverable tape errors during execution 

5. Removal of the tape cassette during execution 

The EDITOR edits from one tape [the "Source Tape," 
containing old data] through the screen to the "scratch 
tape." The identity of the "source" and "scratch" tapes 
or files are reversed each time the current "source" tape 
reaches a file marker indicating end of file. Therefore, if an 
even number of passes have been completed, the updated 
file is on the front deck. If an odd number of passes have 
been made, the CTOS scratch file, file 403, is the updated 
file. New programs are written on the front deck. 

Understanding the activity of the data with respect to the 
tapes will allow the operator to determine the course of 
action should difficulty occur. 

Should the operator encounter difficulty and be rather 
vague as to which action to take, it is recommended that 
the operator choose the most valuable data tape by the 
following: 

When unrecoverable difficulty arises, remove the 
data tape and replace it with a new tape which will 
be written over by the scratch area of the operating 
system tape. 

Run the edit program and type :DUPLICATE in 
response to the original questions. 

The scratch area will be deposited on the new tape. 

Then the operator can manually search through the 
two tapes as separate data tapes and make a decision 
as to the most valuable to keep. 

Special situations: 

It is possible that the scratch area has the most valuable data 
on it but it is missing any file termination record. This can 
occur when the program was interrupted during data entry 
and the previous scratch-to-data tape copy (if any) was so 
far back as to render the scratch area the only desirable 
data. Should this occur, the copy will proceed from scratch 
to source until it runs out of data, in which case the operat- 
ing system will encounter garbage on the tape. It will then 
write end-of-file marks on the data tape at that point. This 
will give a clean data tape suitable for beginning again. A 
note of caution: it is usually advisable, when attempting to 
recover valuable data, to use the two data tape approach 
and visually compare the two to make a value judgment as to 
which has the most desirable data. 
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SECTION 4 

DAT APOINT 2200 
ASSEMBLER 



SECTION 4 



THE ASSEMBLER 



Statements 



The 2200 assembly system consists of the ASSEMBLER, 
EDITOR and the OPERATING SYSTEM. 

The ASSEMBLER generates a block of absolute object code 
which can be loaded by the operating system loader and 
cataloged by the operating system. It generates the object 
code from the symbolic source code which was generated 
by the editor. 

The ASSEMBLER makes two passes over the source code. 

The first pass generates a symbol table from the labels in 
the source code and checks for certain error conditions, 
primarily syntax and form. The symbol table is maintained 
in memory. 

The second pass generates the program listing and the object 
code on the tape. It also produces further diagnostics of a 
more subtle nature. 

Basically, the ASSEMBLER is a program that assigns numeri- 
cal values to symbols and outputs these values upon input of 
the associated symbols. Symbols in certain fields have pre- 
assigned values such as the opcode mnemonics. The value 
assigned to an instruction mnemonic is the binary bit con- 
figuration recognized by the 2200 processor for that instruc- 
tion. 

For example, the following instruction mnemonics have the 
following octal values: 



MNEMONIC 

ADB 

RETURN 

SUB 



VALUE 

201 
007 
221 



Symbols in fields other than the opcode field may be defined 
by the user. Pre-defined and user-defined symbols are kept 
separately by the ASSEMBLER so that the user may define 
symbols that are the same as the pre-defined symbols with- 
out encountering any difficulties. 



A 2200 assembly code statement consists of a label field, an 
instruction field, an expression field and a comment field. 
An example: 



1 



LABEL1 



2 
JTC 



START THIS IS THE COMMENT FIELD 



Field 1 is the label field 

Field 2 is the instruction field 

Field 3 is the expression or operand field 

Field 4 is the comment field 

The 2200 editor provides automatic formatting so that the 
fields always are justified to begin in a certain column with 
tabbing to that field automatic. However, the ASSEMBLER 
only requires the following: 

A non-space in the first column means that the first 
field is a label, except for a leading period which 
designates the entire line as a comment line. 

A space in the first field means a null label and the first 
field is an instruction. 

Scanning proceeds from left to right with one or more 
spaces serving as field delimiters. 

Terminating fields by other than a space or a line 
termination will result in E-flags during the assembly. 

THE LABEL FIELD may consist of up to 6 characters. An 
excess of 6 characters will be truncated. The first character 
may be any alphabetic character or a $ sign. The other 
characters may be any alphanumeric character or a $ sign. 
For example: 



LEGAL 

LABEL1 
LABEL2 
LABELS 
L1B2L3 



ILLEGAL 

1 LABEL (starts with numeric) 
LABEL* (non-alphanumeric character) 
LABEL, (non-alphanumeric character) 



Along with relating symbols with numbers, another major 
function of the ASSEMBLER is to enable one to reference 
a symbol that is defined later in the program. This is called 
FORWARD REFERENCING, and may be handled in a 
variety. of ways. One of the simplest is to look at the source 
code twice. The first time determines the definitions of all 
the symbols and the second time uses the symbols to pro- 
duce the object code. Each "look" at the source code is 
called a "PASS". Therefore, we end up with a two pass 
assembly process. 



THE INSTRUCTION FIELD may be any of the instruction 
mnemonics listed in the Datapoint 2200 Reference Manual, 
compound instruction (described later) or assembler directives. 

The Instruction Field may be from two to four characters. 
However, only the first three are scanned and consequently 
the user may abbreviate. For example: 
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LEGAL 



CALL 



JTZ 
SET 
TP 



ILLEGAL 

CALL2 (instructions have no more 
than four characters or 
numeric characters in the 
field) 



1. EQU EQUALS. Sets the value of the label on the 

statement to the value of the operand ex- 
pression. 

2. SET SET. Changes the value of the location counter 

to the value of the operand expression. 

3. SK SKIP. Increments the value of the location 

counter by the value of the operand expression. 



THE EXPRESSION or OPERAND FIELD consists of any 
number of strings, numbers or symbols with operators 
between them. If a space or line end terminates a number 
or a symbol, the expression is assumed to be ended. Num- 
bers are assumed to be decimal (base 10) unless they have 
one or more leading zeros, in which case they are taken to 
be octal. That is, 1 23 is 1 23 decimal, whereas 01 23 or 
00123 (the octal number 123) is really 83 decimal. 

String quantities are delimited (preceded and followed) by 
apostrophies. In expressions, only the last character of a 
string is used if more than one appears. If a string were to 
be added to a number, only the last character of the string 
would be added. The character value is the ASCII binary 
number with the parity bit always a zero. A null string is 
legal ( ' ' ) and results in a zero value. The forcing character, 
#, is used in strings to indicate that the next character 
should be taken as ASCII no matter what it is. This is useful 
for getting the characters ( ' ) and ( # ) themselves into the 
string. For example: 

'#'##' is the character string ' # 

There are three operators allowed in the expressions: 

1. -I- This means addition 

2. — This means subtraction 

3. >8 This means shift right by 8. Use this to get the 

MSP of an expression. 

Expressions are evaluated from left to right and all opera- 
tions are assumed to have the same priority. 

The operand or expression is a symbolic expression which 
is evaluated at assembly time and the value is used in 
whatever manner is required by the opcode. 

THE COMMENT FIELD begins immediately after the first 
delimiter space after the operand. The comment field may 
have any character including punctuation within it. It is 
terminated by the end of the line which was written by the 
editor. Comments may take over the entire line, in which 
case that line must begin with a period. 

ASSEMBLER DIRECTIVES are available for setting label 
and location counter values to other than the normal 
sequential location assignments and for defining constants. 
There are seven: 



4. TP TABULATE PAGE. Increments the value of 

the location counter until it is a multiple of 
256. This is useful for minimizing execution 
time and for blocking out data areas address- 
able by single precision. 

5. DC DEFINE CONSTANT. Generates eight bit 

object words from one or more expressions or 
strings following the opcode. If the expression 
is terminated by a space, the DC directive 
returns control to the main assembly process 
loop which obtains another instruction. If it 
is terminated by a comma, another expression 
or string is looked for. Another special excep- 
tion is made for string items found in the DC 
directive. All the characters of a string item are 
significant and as many words as necessary are 
generated to accomodate all the characters of 
the given string. Again, a comma is looked for 
after the closing apostrophe in a string item 
to see if more expressions follow. This special 
string item is in effect only if the expression 
opened with an apostrophe. String items in 
expressions still have only one character of 
significance. For example: 

DC 1,2-H3,2-i-'A','ABC' 

generates the following octal values: 

1,5,103,101,102,103 

6. DA DEFINE ADDRESS. Generates a two byte 

constant which is the address, LSP first, of 
the expression. 

7. RP REPEAT. Will cause the following line to be 

processed, the number of times, indicated by 
the operand value. For example: 

RP5 
LDA0123 

would produce the same code as: 
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LDA0123 
LDA0123 
LDA0123 
LDA0123 
LDA0123 

NOTE 

Repeated statements which have a label on them 
will result in multiple definition of that label and 
all that entails, including the "D" error flags. 

FORWARD referencing in the expression field 
in assembler directives only is not permitted. 

8. END END. Indicates that there is no more input 

data to be processed and that the ASSEM- 
BLER should complete generating the output. 
The operand field has special significance in 
the END statement. The value of the expres- 
sion in the operand of the END statement is 
the starting value of the execution of the 
program. That is the starting address. This 
is, of course, optional. When no operand is 
specified, the results are indeterminate. It 
should only be left vacant when the program 
is to be loaded without direct transfer of 
execution to the program such as an overlay. 

Compound instructions are instructions which directly result 
in the assembly producing a sequence of source code. In this 
case, the 2200 ASSEMBLER has two: The HL instruction 
and the DE instruction: 

1. HL The HL compound instruction generates the 
LABEL load H-REGISTER and load L-REGISTER 

instruction necessary to place the address of 
the label LABEL in the H-REGISTER and 
L-REGISTER properly so that the load to 
and from memory will operate to that address. 
In doing the HL, it loads the most significant 
byte of the value of LABEL into the H- 
REGISTER and the least into L. 

2. DE The same as with HL except loads into the 
LABEL D and E registers. 

THE ERROR FLAGS produced by the 2200 ASSEMBLER 
are as follows: 

The error flags can occur during either pass of the ASSEM- 
BLER in response to bad statements. 

They are: 

1. D The D flag means DIFFERENT DEFINITION. 

It is flagged if the label has been redefined to 



a different value during the assembly. In that 
case, it has the second value. 

2. I The I flag means INSTRUCTION MNEMONIC 

UNKNOWN. The instruction was not an accept- 
ed instruction in which case a zero is inserted 
for this instruction. 

3. E The E flag means that an error has occurred in 

an expression or some unrecognizable character 
appeared in the wrong place. In this case a zero 
is substituted for the expression or in whatever 
was unrecognizable. 

4. U The U flag means UNDEFINED LABEL. It is 

used whenever a label is referenced and is not 
defined. This can occur in pass 1 when an 
assembly directive is operating on an expression 
containing a forward reference. 

EXTERNAL COMMANDS & REFERENCES can be taken 
care of in two ways: 

1. Directly produce the numeric value in the expression field 
corresponding to the reference external address (such as 
an operating system subroutine resident in memory) or the 
external command operand such as EX 1 instead of writing 
EX ADR. 

2. Equating labels to these referenced locations using the 
EQU assembler directive and then referencing the labels. 
This can be done for external references to operating 
system subroutines by duplicating the operating system 
subroutine entry point label in your program and equating 
it to that address, i.e. instead of: 

CALL 017000 

to get the operating system keyboard string input routine, 
a more meaningful listing can be obtained if, at the be- 
ginning of the program, this was entered: 

KEYIN$ EQU 017000 

and then all references to this routine can be this way: 

CALL KEVINS 

The same is true of the external commands used in the 
2200. Rather than say: 

EX 1 

it is more meaningful to say: 

EX ADR 
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Since it is an external command address that is desired. 

A list of the external commands and the operands which the 
ASSEIVIBLER incorporates into the proper EX coding are 
below. 

The ASSEIVIBLER treats external command labels differently 
to produce the octal command byte. For the commands, the 
operands are as follows: 



ADR 

STATUS 

DATA 

WRITE 

C0M1 

COM2 

COM3 

COM4 

UNUSED 

UNUSED 

UNUSED 

UNUSED 

BEEP 

CLICK 

DECK 1 

DECK 2 

RBK 

WBK 

UNUSED 

BSP 

SF 

SB 

REWIND 

TSTOP 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 



This is a convenience, since many times many errors will be 
uncovered by the ASSEMBLER already after the first pass 
and the user will desire to correct those errors before pro- 
ceeding to the second pass and the listing. 

If the second pass begins, the tape will rewind and begin 
accepting data again from the source tape, printing the 
listing and writing the object file on the scratch area of the 
rear tape. 

When the tape has reached the end of the source the second 
time, assembly is complete and it only needs to copy the 
object code block on the rear tape to the area on the front 
tape just after the source code. This results in the rear tape 
being backspaced to the beginning of the block of code and 
then copying proceeding forward reading a block from the 
rear deck and writing it on the front deck. 

At the end of ASSEMBLY, the operating system will be 
reloaded and come up running. 

The front tape can be loaded into the machine to test using 
the operating system command RUN*, inputted into 
operating system catalog or loaded using the Debug program 
by using the F command. 



It is recommended that for those external commands used, 
the EQU to the table number is done at the start of the 
source program and then the external command references 
are done to the label. 

Operating The Assembler 

The ASSEMBLER must have a symbolic source tape generated 
by the 2200 editor. 

Place this tape in the front tape deck. 

Run the ASSEMBLER. 

It will ask for printer speed. For the Datapoint 3300P, state 
300. For a model 33 or 35 Teletype, state 110. For a model 
37 Teletype, state 150. For no printer or no listing desired, 
state 0. 

The source deck will rewind and begin to read in. 

At the end of the first pass the ASSEMBLER asks if the 
second pass should proceed. It only requires a YES or NO. 
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SECTION 5 



DATAPOINT2200 



ADVANCED OPERATING SYSTEM COMMAND and SUBROUTINE USAGE 



SECTIONS 



1. INTRODUCTION 

The primary function of CTOS is to provide the user with 
an easily accessible data environment which will greatly 
facilitate program generation. This function is fulfilled 
through the use of a file handling system which is available 
both directly from the keyboard in the form of system 
commands and through program calls to file handling input/ 
output subroutines. Note that the keyboard facility deals 
mainly with the system (rear) tape (using the data (front) 
tape mainly for input/output and scratch space) but that 
the program routines are generalized to allow use of either 
tape. 

1.1 KEYBOARD FACILITIES 

The keyboard accessible facility allows the user to fetch and 
execute object files, which may be either system packages, 
such as the editor and assembler, or files the user has generat- 
ed with either the assembler or other code generating pro- 
grams. This facility also allows the user to create new files, 
alter or delete old ones, or perform certain utility functions. 
The system tracks the files on the system tape in a symbolic 
catalog which may be manipulated by the operator at the 
keyboard or used in program linking. 

1.2 PROGRAM FACILITIES 

The program routines perform basic operations such as 
reading and writing records with all parity checking and 
generation handled for the user. Other operations such as 
positioning to the beginning or end of a file, backspacing 
over records, or rewinding the tape are also provided. 
Parameterization is handled in a generalized way to make 
subroutine usage easy and consistent. 

1.3 PHYSICAL LAYOUT 

The memory layout of the operating system is shown be- 
low. The OS FILE HANDLER is the program accessible 
facility mentioned above while the OS COMMAND HAND- 
LER is the keyboard accessable facility. Note that only 
017400 and up need be in memory if only the symbol 
linker (which calls in an overlay by name so that its physical 
file number may be changed without having to rewrite the 
program calling in the overlay) is to be used, only 016200 
and up need be in memory if only the debugging tool is to 
be used, and only 014000 and up need to be in memory 
if the keyboard facilities are not to be used (of course, 
0-0777 is always reserved by the system). Also note that 
the user may load a program designed to fit into a 2K 
machine without overlaying any part of the full operating 
system. 



CTOS MEMORY USAGE MAP: 



SYMBOLIC LINKER 



CATALOG 



KEYBOARD DISPLAY 



DEBUG 



OS FILE HANDLER 



OSBOOTBLOCKCOPY 



OS COMMAND HANDLER 



2K UNUSED 



LOADER 



017777 
017600 

017400 

017000 

016200 

016200 

014000 

013000 

05000 

01000 



2. THE LOADER 

The loader is the heart of CTOS. It enables other programs 
to load files from the tapes into memory without the tape 
having to be at the beginning of the desired file and provides 
extensive error protection. It is the routine used by the 
bootstrap mechanism (indeed, it is part of the bootblock) to 
load the initial program and is also the routine used in over- 
lay and linkup operations both by CTOS and utility packages. 

2.1 BOOTSTRAP ACTIONS 

When a restart occurs, the rear deck is rewound and the first 
block on the tape (called the bootblock) is loaded into 
memory starting at location zero. The first 512 bytes of 
memory (0 to 0777 octal) have been reserved for a per- 
manently resident program which is loaded from the boot- 
block. The first 40 bytes of this block constitute a program 
which runs a parity check on the rest of the block that 
should have been loaded. The processor is halted (note 
auto-restart implications if the auto-restart tab on the cassette 
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is punched out) if this routine finds a fault in the check. 
Otherwise, zeros are stored in the memory locations used 
in the parity check routine. This will cause a halt if an 
early data drop-out from the tape machine occurs during 
the next bootstrap load (typically only one or two bytes 
get loaded in this failure mode). After the low memory has 
been cleared, a routine calls the loader, which has been 
loaded in the bootstrapping operation, asking for file zero 
to be loaded from the rear deck. If file zero cannot be 
loaded for some reason, the program halts the processor 
without a whimper (no bells or whistles in any of the boot- 
strap operation), otherwise, it jumps to the starting address 
supplied with file zero. Note that if the auto-restart tab is 
punched out of the rear cassette, any failure along the road 
of bootstrapping will cause the whole process to be tried 
again. 

2.2 FILE ORGANIZATION 

Once file zero has been loaded from the system tape, the 
bootstrap program (locations through 074) is never used 
again until the next restart operation which will overlay it. 
The loader, however, will be used many times. The physi- 
cal layout of information on the system tape is as follows: 

BOOTBLOCK/FILE0/FILE1/. . ./Fl LE15/FILE32/FILE127 

File is the one executed by the bootstrap and is typically 
followed by a sequential (required to be sequential by the 
loader) set of minimally increasing (file numbers go up by 
only one at a time) files up to 15 (a CTOS catalog size 
limitation, although the loader will load a file with any 
positive number), followed by a file 32, which is a system 
scratch file, followed by a file 127 (largest positive eight 
bit number), which is a dummy to mark the logical end 
of the tape. 

2.3 FILE LAYOUT AND RECORD FORMAT 

Each file is a group of records starting with a very special 
four byte record. Every record used by CTOS starts with 
two special bytes to indicate that it is one of three types: 
file marker, numeric data, or symbolic data. The file 
marker, which is the special four-byte record at the be- 
ginning of a file, contains two additional bytes that denote 
the file number. The use of two bytes for both the record 
type and file number provides redundancy for error control, 
since the second byte is simply the one's complement of the 
first. The record types are denoted by 0201 for file marker, 
0303 for numeric data, and 0347 for symbolic data. The 
following table summarizes all of the various data formats 
used by the system. XP and CP denote the two longitudinal 
parity checks and will be described later. FN denotes the 
file number and —FN its one's complement. 



FILE MARKER RECORD: 0201 / 0176 / FN / -FN 
NUMERIC DATA RECORD: 0303 / 074 / XP / CP / 

DATA 
SYMBOLIC DATA RECORD: 0347 / 030 / XP / CP / 

DATA (with VRC) 
FILE: FILE MARKER / DATA RECORD/ DATA 

RECORD/... 
SYSTEM TAPE: BOOTBLOCK / FILE / FILE 1 / 

.. ./FILE 15/FILE32/FILE 127 
DATA TAPE: FILE 0/ FILE 1 /.../FILE 127 

2.4 LOADER ACTION 

When the loader is told to load a given file, it begins searching 
the tape (the loader can load files from either deck, depend- 
ing upon which entry point is used) forward until it finds a 
file marker record. Note that all records passed over must have 
a valid type number pair or an error recovery procedure will 
be initiated which will try up to three times to read the record 
correctly and then make an error exit if failure occurred all 
three times. Upon finding a file marker, the loader determines,, 
from the number in that marker, whether the tape is posi- 
tioned to the correct place (the number is equal to that re- 
quested), is not positioned far enough forward (the number 
is greater than that requested). If the tape is positioned to 
the correct place, the loader proceeds to load all of the 
numeric records it finds, obtaining the memory address of 
where it is to put the data from the beginning of each record, 
(symbolic records are ignored) until it runs across another 
file marker. At this point it stops the tape (which was in slew 
forward mode) and backs up over the file marker so a 
succeeding call on the loader would cause a file marker to be 
found immediately. If there were no numeric records in the 
file, an error return is made. If the tape is not positioned 
far enough forward, the loader searches forward for the next 
file marker. If the tape is positioned too far forward, the 
loader enters a reverse search mode. If, in this mode, the 
loader finds a file marker that indicates that the tape is now 
positioned to the correct place, tape motion is reversed and 
the file is loaded as in the forward search case. If it finds 
a file marker which indicates that the tape is not positioned 
backward far enough, the loader continues searching in the 
reverse mode for the next file. If, however, a file marker is 
found that indicates that the tape has been positioned too 
far backward, the loader decides that the file is not on the 
tape and makes an error return. Error returns are also made 
if a record can not be read without a parity failure or type 
indicator discrepancy (the two characters are either not the 
one's complement of each other or are not one of the three 
special numbers) occurring in all three trials or if loading 
the record would overstore the loader. In all of these cases, 
the carry condition will be true (a satisfactory load always 
rendering the carry condition false) and the tape will be 
positioned after any offending record. 
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2.5 PARITY CHECKING 

The third and fourth bytes of every data record contain 
longitudinal parity checks. These bytes are set up by the 
record generation program such that the following exclusive 
OR sums will yield zeros: the first byte with all the data 
characters (data characters start with the fifth byte of the 
record and proceed to the end) and the second byte with 
the same characters except the sum is shifted right circularly 
one place after each exclusive OR. In the case of symbolic 
records, the additional condition of the vertical parity of 
each character being odd must also be met. One thing not 
mentioned in the discussion of the loader was that the 
first four data characters (fifth through eighth bytes in the 
record) are not really data but are the MSP and LSP of the 
starting memory address followed by the one's complement 
of the MSP and LSP of the starting memory address of where 
the data is to be loaded. 

3. THE CATALOG, SYMBOLIC LOADER, 
BASIC I/O, AND DEBUG 

As mentioned above, the operating system maintains a catalog 
of names which correspond to the files on the system tape. 
This catalog may be used in manipulating the files from the 
keyboard or in symbolically calling in overlays using the 
symbolic loader from a user program. 

3.1 CATALOG CHARACTERISTICS 

Each name in the catalog must start with a letter and may 
additionally contain from one to five alpha-numeric 
characters. There is room in the catalog for up to fourteen 
names so there is a limit of fourteen cataloged files on one 
system tape. The symbolic loader contains routines which 
will look up a given name up in the catalog and load the 
corresponding file. This same lookup routine is used by 
the command handler and is labeled LOOKUP. 

3.2 UTILITY ROUTINES IN THE SYMBOLIC 
LOADER 

Other utility routines in the symbolic loader area are a 
block transfer, labeled BLKTFR, and a routine, labeled 
IIMCSWP, which increments the H and L register pair and 
then swaps it with the D and E register pair. The block 
transfer will move the number of characters specified by 
the entry value in the C register from a memory address 
starting with the entry values in the H and L registers to a 
memory address starting with the entry values in the D 
and E registers. 

3.3 LOADING ROUTINES 

To use the symbolic loading routine, one loads into the D 
and E registers the address of the six characters of the de- 
sired name (trailing blanks must be included) and calls 



MLOAD$. If the zero condition is false upon return, then 
the given name was not in the catalog. If the zero condition 
is true but the carry condition is false upon return the loader 
could not either find or correctly load the file requested. 
Note that one must be certain to place the call to M LOADS 
in a place that will not be overlayed since execution will 
resume following the CALL instruction after the file has 
been loaded. 

3.4 OTHER SYMBOLIC LOADER FACILITIES 

Another facility in the symbolic loader area will load and 
execute a file whose number (not name) is in the B register 
upon call. Calling MAUTO$ will load the file from the 
system tape and calling MAUT2$ will load the file from 
the data tape. If the loader could not either find or load the 
file, the operating system is automatically reloaded. 

3.5 KEYBOARD AND DISPLAY ROUTINES 

The operating system contains facilities to ease the burden of 
communicating with the operator. Two routines exist. The 
first accepts the characters from the keyboard, displays them 
on the screen, and stores them into a memory buffer. The 
second writes a string of characters from a memory buffer 
onto the screen. 

3.5.1 KEYBOARD INPUT 

The keyboard input routine, labeled KEVINS, accepts a 
specified maximum number of characters, given by the entry 
value of the C register, from the keyboard and puts them 
into memory starting at the entry value of the H and L 
registers and onto the screen at a starting horizontal cursor 
position of the entry value of the D register and vertical 
cursor position (which cannot be changed during the course 
of one input) of the entry value of the E register. Note that 
if the cursor collides with the right edge of the screen during 
entry, characters other than backspace, cancel, and ENTER 
will not be accepted, although they will print over each other 
in the last display position. The ENTER character (015) 
terminates input and is stored in the memory buffer to 
specify the end of data but is not written to the screen. 
Hitting the backspace key will delete the last character enter- 
ed and move the cursor appropriately while hitting the 
delete key will delete all characters entered and also move 
the cursor appropriately. These two keys also back up the 
buffer memory pointer appropriately. Note that if one has 
typed a character at either the screen limit or at the maxi- 
mum character count limit, hitting a backspace will cause the 
previous character to be erased and leave the last character 
still on the screen, although it will either not appear on the 
memory buffer or be after the 015. 
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3.5.2 DISPLAY OUTPUT 

The display routine, labeled DSPLY$, will display the string 
of characters stored in memory starting at the address which 
is the entry value of the H and L registers and terminating 
with a character whose numerical value is either a 3 (ETX) 
or 015 (ENTER). The cursor starts at the entry values in 
the D (horizontal) and E (vertical) registers (a cursor posi- 
tion that is off the screen will not be sent to the CRT) and 
stops after the last character printed if the terminating 
character was a 3 or at the beginning of the following line 
if the terminating character was an 015. Note that, as in 
KEVINS, the cursor stops at the right edge of the screen 
and the characters overwrite each other if more are available 
after collision. Also note that if display was occurring on 
the bottom line and the terminating character is an 015, 
then the whole screen is rolled up to force the existence 
of a following line and the information that was at the top 
of the screen is lost. After return from the display routine, 
the H and L registers will point to the location after the 
terminating character and the D and E registers will reflect 
the current cursor position. The cursor will be off while 
the display routine is writing, but it is turned back on upon 
exit even if it was off upon entry. Other special control 
characters can cause cursor positioning, line/frame erasure, 
and screen roll-up: 

01 1 - a new horizontal position (0 to 79) follows 
01 3 - a new vertical position (0 to 11) follows 

021 - erase to the end of the frame 

022 - erase to the end of the line 

023 - roll the screen up one line 

3.6 THE DEBUGGING TOOL 

The debugging program allows the user to observe and modi- 
fy any location in memory, to load files from either the 
system or data tapes, and to start execution at any place in 
memory. This allows him to load and debug programs with 
surprising ease. The major debugging technique is to insert 
RETURN instructions in critical places in memory so one 
routine at a time may be checked using the CALL com- 
mand. All but two (user specifiable) of the registers may 
be saved upon return from the program being tested, 
allowing the user to determine if the proper actions are 
taking place by observing critical register and memory 
values. The registers A, B, C, D, E (subject to the H and L 
commands in Section 3.6.3) are stored in locations 16770, 
16771, 16772, 16773 and 16774 respectively upon a re- 
turn to Debug from a program which was called from 
Debug. 

3.6.1 INPUT SYNTAX AND ERROR ACTION 

The debugging program is entered from the command hand- 
ler as explained in a later section or by processor execution 
control being passed to the location labeled DEBUGS. At 



this time the bottom line of the display will be erased and 
the current location and its contents will be displayed there. 
The program is now ready to accept input in the format 
<number><command>. The number is assumed to be 
octal and the absence of any digits between zero and seven 
implies a value of zero for the number. Only sixteen bits of 
significance are kept for the input value. If more are entered, 
the first digits entered are lost. Some commands use only 
the lower order eight bits. The number is terminated by the 
first character that is not between zero and seven and this 
character is taken to be the command. Note that leading 
spaces are not permitted. This line is read in using the 
KEVINS routine previously discussed, thus enabling the use 
of the backspace and cancel keys but requiring the ENTER 
key to be struck to obtain a response. In one case the 
ENTER character is the command and in some others the 
number is disregarded. If the command is not recognized, 
the program simply ignores it and the old current address 
and its contents are displayed again. After every command, 
control is returned to the entry point of the debugging 
program which will display the now current address and 
its contents. 

3.6.2 THE CURRENT ADDRESS 

Two memory locations in the debug contain an address 
(initialized to zero upon loading) which points to a memory 
location which is the current center of interest. Available 
commands allow one to change the contents of this memory 
location and move the pointer as well as perform other 
functions. 

3.6.3 COMMAND MEANINGS 

The following is a list of each command character with its 
effect and the number (in parenthesis) of bits of the given 
number used: 

ENTER - set the current address to the number given (16) 

I - increment the current address by one (0) 

D - decrement the current address by one (0) 

M - change the current address contents to the number 

given (8) 
. - do the M followed by the I command (8) 
L - upon return from a C command, cause the L regis- 
ter to be stored into the register whose number is 
given (3) 
H - same as the L command but for the H register (3) 
G - load from the system tape the file whose number 

is given (8) 
F - load file one from the data tape (0) 
- return to the operating system command handler (be 

sure it is there) (0) 
C - execute a CALL instruction to the location whose 
number is given (16) 
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4. KEYBOARD FACILITIES (OS COMMAND 
HANDLER) 

The operating system contains a program which will inter- 
pret user commands given at the keyboard and perform the 
tasks indicated. These tasks mainly involve copying new 
files from the data tape onto the system tape, copying files 
from the system tape onto the data tape, deleting and up- 
dating files on the system tape, and executing programs 
kept in these files, as well as several other functions. 

4.1 SYNTAX RULES AND ENTRY ERROR 
ACTIONS 

The command input format is purposely made quite strict 
to reduce the chance of causing unwanted action which 
could be catastrophic to the user's data. The command must 
start with the first character entered (leading spaces are 
illegal) and any alphabetic after the third character is 
ignored (thus DEBACLE will be interpreted as the DEB 
command just as well as DEBUG). The first non-alphabetic 
character must be either an ENTER, a space, or a dash 
(minus sign). Some commands will not allow the ENTER 
but typing a non-alphabetic other than these three will 
always net you an error message of WHAT?. This will also 
appear if a command that has legal syntax but is not one of 
those defined is entered. If the command is to be para- 
meterized, the first name must follow the dash or space 
immediately and must be terminated with an ENTER if 
that is the only parameter. The name must start with an 
alphabetic but may contain any number of alpha-numeric 
characters even though all after the six will be ignored. If 
the command has two parameters, the first must be 
terminated by an ENTER. If a name is terminated by 
characters other than those specified, the error message 
BAD NAME will be displayed. If a name is not supplied but 
the command requires one, the error message NAME RE- 
QUIRED will be displayed. If the name given is required 
to be in the file catalog but is not, the error message NO 
SUCH NAME will be displayed. If the inverse is true, the 
error message NAME IN USE will be displayed. 

4.2 OPERATING SYSTEM COMMAND IN- 
STRUCTIONS 

The following paragraphs describe the usage and effect of 
each command in the system. Each paragraph is titled by 
what must be entered to use the corresponding routine. 
Note that, for clarity, more than just the necessary three 
characters have been shown. 

4.2.1 CATALOG 

The CATALOG command lists the names of all files that 
are currently on the system tape. They are listed across the 
screen in the physical order in which the files appear on the 
tape. Any parameters supplied are ignored. 



4.2.2 NAME (old), (new) 

The NAME command will change the name of the file 
specified by the first name given to the second name given. 
This command requires that the first and not the second 
name be in the catalog. The catalog file on the system tape 
(a one record file (number one) that immediately follows 
the operating system file) will be overwritten with the new 
catalog. Note that this leaves the system tape positioned 
before the file marker of any existing first cataloged file. 
This operation is performed by all commands that change 
the catalog. 

4.2.3 RUN (name) 

The RUN command uses the loader to load the file specified 
by the name given and then transfers processor control to the 
starting address indicated to the loader by the file informa- 
tion. Note that it is the responsibility of the loaded program 
to return to or reload the operating system if this is desired. 
There is a special case to the RUN command that breaks the 
general syntax rules. If the name consists of exactly one 
asterisk terminated by an ENTER (RUN-*), the loader will 
be directed to load physical file 1 from the data tape. This 
provision is made to allow the user to run a program he has 
generated without having to load it onto the system tape. 
This, along with the F command in the debugging tool, 
eliminates a lot of tape movement when debugging programs. 

4.2.4 IN (name) 

Note that exactly the characters shown must be typed to 
execute this command since the space which must be the 
third command character will also terminate the command. 
This command will position the system tape after the last 
cataloged file and the data tape to the beginning of physical 
file 1. (The data tape convention is that physical file will 
be the first piece of information on the tape, containing the 
users symbolic data for a given program, and that physical 
file 1 will be the second piece of information on the tape and 
will contain the users object data for a given program, and 
all tape after this is to be considered a scratch area which is 
properly terminated by physical file 127 to indicate the 
logical end of the tape.) The command then copies all 
records in the file from the data tape onto the system tape 
creating a file on the system tape (a file marker being written 
before the data was copied) which has the next available 
physical file number. Following this new file, file markers 
32 and 127 are written on the system tape to indicate the 
new start of system scratch and logical end of tape. If the 
system tape contained no cataloged files before this com- 
mand was issued, the file entered will be physical file 2 and 
immediately follow the catalog file. After the new file has 
been written, the new name is entered into the catalog and 
the catalog file is updated as in the NAME command. Note 
that if the catalog was full when the command was entered, 
the .error message LIBRARY FULL will be displayed and no 
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other action will occur. The name supplied must not al- 
ready be in the catalog. 

4.2.5 OUT (name) 

The OUT command first executes the PREPARE command 
to provide itself with a null data tape which can be handled 
by the file handling routines. It then positions the system 
tape to the beginning of the given file (the name must have 
been in the catalog) and the data tape to the beginning of 
physical file one and copies all the records in the file on the 
system tape onto the data tape. It then places a file marker 
127 on the data tape and quits. Note that the catalog file 
is not updated for this command. This command is pro- 
vided to allow moving a file from one system tape to 
another through the associated use of the IN command. 

There are two special cases to the OUT command that break 
the general syntax rules. If the name consists of exactly one 
dollar sign terminated by an ENTER (OUT-$) then an 
exact copy is made of the system tape up to file marker 32 
at which time the copy is terminated by file markers 32 
and 127 (which causes any scratch data on the old system 
tape to be removed). If the name is exactly one asterisk 
terminated by an ENTER (OUT-*), the action is similar to 
the previous case except physical files and 1 (namely, the 
operating system) are deleted and the file numbers of all 
following data files (not file 32 or 127) are lowered by two. 
Note that if this tape is now bootstrap loaded, the first 
program loaded will be what was the first file cataloged in 
the operating system. This is most useful in preparing 
bootstrap tapes that will be used in machines with less than 
8K of memory. 

4.2.6 DELETE (name) 

The DELETE command takes two different courses of 
action depending on whether or not the file deleted is the 
last one cataloged. If it is, the system tape is moved to the 
end of the next to the last cataloged file and file markers 
32 and 127 are written, thus logically destroying the last 
file. The name is then deleted from the catalog and the 
catalog file is updated. If the file is not the last one cataloged, 
the PREPARE command is called to obtain a fresh data tape, 
as in the OUT command, and the system tape is positioned 
to the end of the named file. The rest of the system tape (up 
to the file 32 marker) is then copied onto the data tape and 
the data tape is terminated with a file marker 127. Note 
that the data tape file numbers start out at one and increase 
by one for each succeeding file copied onto the data tape. 
These numbers are not used since all the copy back part 
needs to know is file delimitation since it is getting its file 
number information from catalog positions. The copying 
onto the data tape is followed by the system tape being 
positioned to the end of the file before the one named and 
the data tape being positioned to the beginning of file one. 
A file marker having a value one greater than the previous 



marker is then written on the system tape and then the data 
tape is copied back onto the system tape with every file 
marker encountered on the data tape causing a file marker 
of value one greater than the previous marker to be written 
on the system tape. This process terminates when a file 
marker 127 is encountered on the data tape which causes 
file markers 32 and 127 to be written on the system tape. 
The given name is deleted from the catalog, all following 
entries are dropped down one place to correspond to the 
similar shift in file numbers that took place, and the catalog 
file is updated. 

4.2.7 REPLACE (name) 

The REPLACE command is quite similar to the DELETE 
command except that instead of preparing the data tape 
with the PREPARE command, it positions it to the end of 
file 1 and then writes a file marker 2. Now, copying all 
the files after the named one onto the data tape in a 
fashion similar to the DELETE command and copying the 
data tape back onto the system tape in exactly the same 
fashion as in the DELETE command will replace the named 
file by file 1 on the data tape, with any necessary physical 
expansion or contraction taking place. Even though the 
catalog is not changed in this operation, it is updated any- 
way since this is an easy way to position the system tape 
to a place before file marker 127. Without this, a succeeding 
call on the loader would run into trouble since the system 
tape would be left positioned after file marker 127 and the 
loader always starts by searching a tape forward which in 
this case would be off the logical end of the tape. The 
loader starts with a forward search because the very first 
time it is used, the tape is positioned just after the boot- 
block and a backward search for a file marker would 
cause trouble. The operating system routine which searches 
for files can start with a reverse search to avoid the pro- 
blem since the tape will never be resting before file zero. 

4.2.8 AUTO or AUTO (name) 

There is a word in the catalog which contains the physical 
file number of a file which should be loaded and executed 
immediately upon loading and execution of the operating 
system. This enables a user program to be run after restart 
without interaction with the operation system being re- 
quired. If this word is a zero or the keyboard switch is 
being depressed upon initial execution of the operating 
system, the normal entry is made into the operating sys- 
tem and the start up message and response request are 
displayed. 

If the AUTO command is given with no name and the auto 
pointer is zero then the error message NAME REQUIRED 
will be displayed. Otherwise the name of the file being 
pointed to will be displayed in the message AUTO SET TO 
(name). If the auto command is given with a name (which 
must be in the catalog) and the auto pointer is a zero, the 
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pointer will be changed to the corresponding file number 
and the catalog (which contains the pointer) will be up- 
dated. If the auto pointer is non-zero, the name is ignored 
and the AUTO SET TO (name) will be displayed as in the 
no-name case. 

4.2.9 MANUAL 

The MANUAL command will zero the auto pointer and up- 
date the catalog if the auto pointer was non-zero. Other- 
wise, the message AUTO NOT SET will be displayed. 

4.2.10 PREPARE 

The PREPARE command first asks the operator if the data 
tape contains anything of value and then halts. (Note that 
the auto-restart tab should not be broken out of the 
operating system tape because it will prevent use of the 
OUT, DELETE, or PREPARE commands since halting the 
processor will cause an auto-restart.) After the operator 
hits the RUN button as a response, it is assumed that the 
data tape is of no value as it is rewound and file markers 
0, 1, and 127 are written on it. This is needed since the 
operating system routines require file markers for which 
they can search in using the data tape. 

4.2.11 HEX (name) 

The HEX command is similar to the IN command except 
that the data tape is formatted in symbolic records with 
no parity checking. This is useful in loading onto the sys- 
tem tape data produced by sources other than the 2200. 
There are four types of records accepted. The type is 
determined by the second character (the first must always 
be an 012 (LF)): asterisk means ignore the record; pound 
sign denotes the logical end of the tape; plus sign means 
the following four hexadecimal characters are a new 
starting address (these must be terminated by an 023 
(XOFF)); and a hexadecimal character denotes a data 
record. All other cases are assumed to be data read errors. 
A data record must always contain an even number of only 
hexadecimal (0 through 9 and A through F) characters 
terminated by either an 023 or a plus sign. The characters 
are paired up to form successive bytes of eight bit data. 
If the terminating character is an 023 then the block of 
data bytes is written out in loader format and the starting 
address is incremented by the number of data bytes. If the 
terminating character is a plus sign then the data remains 
in the buffer and the following record will be appended to 
it. This allows blocks of larger than 36 bytes (128 is the 
upper limit) to be written when the device which writes the 
tape is limited to lines of 72 characters. Note that there is 
no buffer overflow protection and it is the responsibility 
of the program generating the symbolic data to keep the 
total number of continued bytes to 1 28 or less ( 1 28 
hexadecimal character pairs). Also note that if a continu- 
ation line is followed by a new address line, the data 
will remain in the buffer but the starting address will 
change. This combination will cause incorrect results 



since even if the buffer did not overflow will also over- 
write critical pointers which will cause the operating sys- 
tem to produce an error message (because it will be called 
with incorrect parameters when the critical pointers are 
overwritten) and be reloaded. If a read error is detected, 
the data tape is backspaced one record and read again. 
This will go on until the data appears correctly or the 
keyboard switch is depressed. Depression of the keyboard 
switch causes the same action as reading ifrom the data tape 
a record starting with a pound sign. 

4.2.12 DEBUG 

The DEBUG command causes the debugging tool described 
earilier to be entered. 

4.3 SYMBOLIC OPERATING SYSTEM AND EX- 
TENDED COMMAND INSTRUCTIONS 

The overlay program SOSX is available to extend the operat- 
ing system command set. The following paragraphs describe 
the usage and effect of each new command. Each paragraph 
is titled by what must be entered to use the corresponding 
routine. Not that, for clarity, more than just the necessary 
three characters have been shown. 

4.3.1 CHOP (name) 

The CHOP command deletes the named file and all subsequent 
files. 

4.3.2 INSERT (new, (old) 

The INSERT command proceeds like a REPLACE command 
except it includes the old named file as one of the files 
written after file 1 on the front deck. When the front deck 
is copied back onto the CTOS tape a new object file has been 
inserted. 

4.3.3 APPEND (name) 

The APPEND command appends the object file from deck 2 
onto the end of the named file on the CTOS tape. Like the 
DELETE command, it has two possible courses of action, 
depending on whether or not the file being appended is the 
last cataloged file. If it is, the tape is positioned to the end of 
the cataloged file and a new object file is copied from the 
front deck. New file 32 and 127 markers are written. If the 
named file is not the last cataloged file, the operation pro- 
ceeds like REPLACE except that the CTOS tape is positioned 
to the end of the named file before the copy is performed. 

4.3.4 LGO (name [, name, name . . . ] ) 

The LGO command makes a tape with a loader and the named 
file(s) in the sequence named in the command. The files will 
have sequential file markers starting with 0. There is a limitation 
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of 23 characters on the command length, thus to name many 
files in the LGO command it may be necessary to temporar- 
ily rename the files with one character labels. LGO * is not 
permitted. OUT * has the desired effect of generating a load 
and go tape of all cataloged files. 

4.3.5 SYMBOLIC (name) 

The SYMBOLIC command adds a compressed source file 
(file #0) to the CTOS tape (in a fashion similar to IN). The 
name in the internal catalog will have an 'S' in the seventh 
(not displayed) position to identify the file as symbolic. 

4.3.6 SREPLACE (name) 

The SREPLACE, symbolic replace, command is performed 
exactly as the REPLACE except the compressed source file 
(file #0) is used instead of the object file. File 1 may be 
overwritten. 

4.3.7 SIIMSERT (new), (old) 

The SINSERT, symbolic insert, command is performed 
exactly as the INSERT except the compressed source file 
is inserted instead of the object file. File 1 will be over- 
written. 

4.3.8 ATTACH (name [, name, name . . . ] ) 

The ATTACH command positions the front deck to the 
end of file and (without file markers) copies specified 
file(s) from the CTOS tape to the front deck. When all 
specified files are copied, the question 'END (LABEL 
OR :)?' will appear. A six character label may be entered. 
If ':' is typed no end statement will be added. The 
ATTACH * form of the command will attach, in cataloged 
sequence, all symbolic files to file on the front deck. 

5. PROGRAM FACILITIES (OS FILE HAND- 
LER) 

The operating system contains a set of routines which will 
perform all of the various input/output functions needed 
to maintain the files of data on the tapes. These routines 
are packed in the upper 2K of memory and are made avail- 
able to the user if he wishes to handle his mass storage 
problems in conformance with the conventions of the 
operating system. All routines are uniformly parameter- 
ized and are accessed through an entry point table (a group 
of JUMP instructions to the actual routine locations) so 
any updates to the operating system will not have any 
effect upon the user's code. 

5.1 ROUTINE PARAMETERIZATION 

Routine parameterization consists of a memory location in 
the D (MSB) and E (LSB) registers of the first byte of a group 
of four bytes (called a packet) which parameterizes the call 



more explicitly. This method reduces the number of memory 
locations required to perform a routine call since, in a 
typical program, one needs only a few different packets but 
will have many different calls. The parameterization of some 
routines is not as extensive as that of others, but the same 
packet can generally be used for the different calls when 
they are affecting the same file. 

5.1.1 LOGICAL FILE NUMBERS 

The first byte in the packet is the logical file number and 
must be between zero and seven or an internal error H will 
occur upon calling any routine using this packet. This error 
condition usually occurs when the user has either failed to 
load the D and E registers at all or has loaded them with an 
erroneous value before calling the routine. The second and 
third bytes in the packet contain the LSB and MSB (respec- 
tively) of the first location in memory to be used as a data 
buffer. Actually, the two bytes previous to this location 
will be used by some of the routines as discussed later. This 
data buffer may be located anywhere in memory. The 
fourth byte in the packet specifies the length of the data 
buffer when numeric data is being handled. Note that 
using only one byte for the length implies that numeric 
records may not contain more than 256 data bytes. 
Actually, the maximum number of data bytes specified may 
not be greater than 254 for reasons that are made clear in 
the numeric routine instructions. The four bytes of the 
packet may be located anywhere in memory. 

5.1.2 PHYSICAL DEVICE AND FILE 
NUMBERS 

The logical file number specified in the packet is converted 
by each routine, via an internal transformation table, into 
physical file and device numbers. The physical device num- 
ber specifies whether the operation is to be performed on 
deck on (rear) or deck two (front) and the physical file num- 
ber specifies which file is to be treated on the given deck. 
Actually, not all routines use all of this information since, 
for instance, when one is reading records from a file he 
assumes that he is using the file to which the tape was last 
positioned. The internal transformation table is initialized 
at load time to the following values: 



LOGICAL 


PHYSICAL 


PHYSICAL 


GENERAL 


FILE 


FILE 


DEVICE 


USE 











Unassigned 


1 





1 


General deck one 


2 





2 


General deck two 


3 


1 


1 


CTOS catalog 


4 





2 


Symbolic data 


5 


1 


2 


Object data 


6 








Unassigned 


7 


32 


1 


System scratch 
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It is shown that logical files 1 and 2 are specified for use of 
any physical file, even though is shown in the table. This 
can be done by use of a routine that will change the physi- 
cal file number of a given logical file. A routine also exists 
to allow the physical device number to be changed, thus 
allowing the user to set up logical files in any physical con- 
figuration needed. Note, however, that one must have 
logical files 1 through 5 and 7 in the state shown (except 
for the physical device numbers of logical files 1 and 2) 
if one returns control to the operating system command 
handler, since the loaded values are assumed by this pro- 
gram. Logical files and 6 may be used freely but must be 
set before the first call utilizing them. The following is an 
example of a packet usage as it would be expressed in the 
assembler: (Note all calls to CTOS tape routines must, as 
in the following example, be preceeded by a DE to the 
forst byte of the packet. Note also that the packet con- 
sists of 4 bytes: Logical file number, LSP of buffer, MSP 
of buffer and length of buffer) 



taken in the case of fatal errors, for which it is decided that 
the only recourse is to reload the operating system. This is 
called an internal error and the message INTERNAL 
ERROR (letter) is written on the bottom line of the dis- 
play before the system is reloaded. The various letters which 
may appear are the following: 

A - Illegal device specification ■ 

B - Illegal record format 

D - Unrecoverable parity error 

G - Unfindablefile 

H - Illegal logical file specification 

The other path is non-fatal and simply returns with certain 
condition flags in states other than normal to indicate that 
something unusual happened. Since every routine uses a 
common subroutine (labeled GETPKT) to get the parameters 
from the specified packet, common internal errors can occur. 
If the logical file number is not between zero and seven, an 



LOOP 



LA 


2 


DE 


PACKET 


CALL 


CPDN$ 


LA 


3 


DE 


PACKET 


CALL 


CPFNS 


DE 


PACKET 


CALL 


PBOF$ 


DE 


PACKET 


CALL 


SSFR$ 


JTC 


DONE 


JFZ 


TERR 



Set up logical file six to be used as physical file 3 on the 
front deck 



JMP LOOP 



DONE 



TERR 



Position to the beginning of the file 

Read a record of symbolic from it into BUFFER 

Quit if to the next file marker 
Exit if type error 

Action taken for each record 

Action taken when file completely in 
Type error action 



PACKET 


DC 


6 


Logical file 6 




DA 


BUFFER 


Buffer address 




DC 





Length (not used) 




DC 


0,0 


Room for parity check generation 


BUFFER 


SKIP 


128 


Buffer area 



5.2 ROUTINE USAGE INSTRUCTIONS 

To use a routine, one sets up whatever is required for proper 
parameterization and then calls the desired location in the 
entry point table. The locations are labeled with the first 
word in the following paragraph titles followed by a $. For 
example, to call the serial numeric file read, one would say 
CALL SNFR$. The routine will either perform the requested 
task or take one of two error exit paths. The first path is 



internal error H occurs. If the physical device number is not 
either a 1 or a 2, an internal error A occurs. Other than for 
these error actions, the following paragraphs described the 
effects of and the exact parameterization needed for each 
routine. 

5.2.1 SNFR- SERIAL NUMERIC FILE READ 

This routine reads the next record from the specified device. 
If the record is of type symbolic, the zero and carry conditions 
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are set false and return occurs with no parity checking or 
data storage being performed. If the record is a file marker, 
the carry condition is set true and the tape is backed up 
to where it was before the routine was called. Again, re- 
turn occurs with no data storage being performed. If the 
type is numeric, the two parity bytes followed by the data 
are read into the buffer. If the parity checking fails or 
the record type is bad, three efforts are made at reading the 
record by backing up to its beginning and starting over. If 
recovery is not made in one of these efforts, an internal 
error D occurs. If the record is read successfully, return 
occurs with the zero condition true, the carry condition 
false, and the H and L registers containing the memory lo- 
cation of the byte following the last one loaded from the 
tape. To calculate the length of the buffer area used, one 
must subtract the buffer starting address from returned 
values in the H and L registers. Remember that the first 
two characters in the buffer are not data characters but 
are the two longitudinal check sums. To obtain the num- 
ber of data characters loaded, one must subtract the 
buffer starting address plus two from the returned values 
in the H and L registers. The parity checks are stored 
because the SBFW routine uses them instead of regenerat- 
ing them from the data, thus shortening the time required 
to copy numeric records from one deck to the other. 



in the data buffer and the length specifies the number of 
actual data characters. The routine generates the two longi- 
tudinal parity sum initialization values and inserts them in 
the two locations preceeding the buffer. It then writes on 
the specified device a record of type numeric containing the 
two parity bytes generated, followed by the number of data 
bytes specified. Note that the length is adjusted to accomo- 
date the two parity bytes so, as in the SBFW routine, only 
254 actual data bytes may be written. If one specifies a 
length of 255 or 0, the only bytes (besides the record type) 
written on the tape will be respectively the first or both 
parity initialization sums. No error exits are made from this 
routine. 

5.2.5 SSFW - SERIAL SYMBOLIC FILE WRITE 

This routine performs in a fashion similar to the SNFW 
routine except that an 015 character in the data string 
rather than a specified value is used to determine the buffer 
length, vertical (in addition to longitudinal) parity generation 
is performed, and a record of type symbolic rather than 
numeric is written. The terminating 015 character is not 
included in the set of characters written to the tape, but 
remember that it will appear again if the SSFR routine is 
used to read the record. 



5.2.2 SSFR - SERIAL SYMBOLIC FILE READ 



5.2.6 PEOF- POSITION TO END OF FILE 



This routine reads the next record from the specified de- 
vice. If the record is of type numeric or file marker, the 
action taken will be the same as when SNFR reads a 
symbolic or file marker record. Action similar to that 
taken by SNFR is also taken if parity or type faults occur. 
If the record is read satisfactorily, only data characters will 
be in the buffer starting at the address specified. An 015 
will mark the end of the data string and all vertical parity 
bits will be zero. The same normal exit conditions as in 
SNFR will occur. 

5.2.3 SBFW -SERIAL BLOCK FILE WRITE 

This routine writes a record of type numeric on the speci- 
fied device. The total number of bytes, including the parity 
initialization sums as the first two, must be in the fourth 
byte of the packet. Note that inclusion of the parity initiali- 
zation sums implies that the total number of actual data 
bytes cannot exceed 254. This routine assumes that the 
first two bytes in the buffer are the correct parity initiali- 
zation sums since it does not generate them from the data. 
There are no error exits from this routine which implies 
that writing off the end of the tape will not be caught and 
that read-after-write checking is not performed. 

5.2.4 SNFW - SERIAL NUMERIC FILE WRITE 

This routine performs in a fashion similar to the SBFW 
routine except the two parity bytes are not included 



This routine searches forward on the specified device until it 
finds a file marker. It then backspaces the tape until it is 
between the next to the last and the last record in the file. It 
then forward spaces the tape one record which puts it at the 
end of the file, having arrived there via forward tape motion. 
This forward arrival is important to observe when one plans 
to append one record after another and still maintain physical 
interrecord gap integrity. Note that every record passed over 
by the PEOF routine must have a valid record type or it will 
be read again in action similar to parity failure action in the 
SNFR routine. 

5.2.7 PBOF - POSITION TO BEGINNING OF FILE 

This routine searches for a file marker in a fashion similar to 
the loader except it starts by searching backwards. The file 
number searched for is specified by the physical file number 
supplied by the generalized parameterization. Note that since 
this routine starts by searching backwards, it will not decide 
that the requested file is not on the tape until it has found in 
the search forward mode a file marker that specifies a file 
number greater than the one desired, if indeed the file is not 
on the tape. Also note that if the leader is found in the search 
backward mode, the tape is positioned forward past the first 
record and the backward search is continued. If the first 
record is not a file marker (operating system convention re- 
quires it to be) or is a file marker whose value is greater than 
the one desired, the first record on the tape will be passed 
over back and forth until external intervention is imposed. 
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Otherwise, all search rules and error exit conditions of the 
loader routine apply here. If, upon return, the carry condi- 
tion is true, then the file was not found. Otherwise, the 
tape will be positioned at the interrecord gap following the 
file marker, having approached that point with forward 
tape motion for the reasons expressed in the PEOF routine 
instructions. 

5.2.8 BSP - BACKSPACE 

This routine simply backspaces the tape one record using 
the hardware backspace function. No checking is made to 
see if the record was of proper type or if the tape ran onto 
the leader. 



5.2.11 TRW -TAPE REWIND 

This routine performsa hardware high speed rewind of only 
the front deck. If the rear deck (physical device 1) is specified, 
an internal error A will occur. Upon exit from this routine, 
the tape will be positioned to the clear leader. 

5.2.12 TFNR- TAPE FILE NUMBER READ 

This routine acts in a fashion similar to PEOF until it finds the 
file marker. At this point, it simply reads the value of that 
marker and leaves the tape positioned after the marker record. 
The value read is returned in the C register. Error exits similar 
to the PEOF routine can occur. 



5.2.9 CPDN - CHANGE PHYSICAL DEVICE 
NUMBER 

This routine stores the entry value of the A register (note 
the break from generalized parameterization) into the 
physical device number entry for the specified logical file 
in the internal transformation table. 



5.2.13 TFNW- TAPE FILE NUMBER WRITE 

This routine will write on the specified deck the special four 
byte file marker record containing the physical file number 
specified. No error exits will occur. 



5.2.10 CPFN - CHANGE PHYSICAL Fl LE 
NUMBER 

This routine stores the entry value of the A register (note 
the break from generalized parameterization) into the 
physical file number entry for the specified logical file 
in the internal transformation table. 
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DATAPOINT 2200 TRACE PROGRAM 

Introduction 

TRACE is an interactive octal debugging aid for the Data- 
point 2200. It operates under the Computer Terminal 
Operating System (CTOS) and occupies memory space 
between 56008 and 137778. The normally resident operat- 
ing system subroutines are not overlayed and are callable 
by the program being traced. 

TRACE accepts commands from the keyboard and displays 
its results in the rightmost eight columns of the CRT dis- 
play. It allows a user to trace the execution of a program, 
to examine and change the contents of the registers and 
memory. 

Entering Commands 

TRACE commands consist of up to two octal operands 
followed by a single letter operation. If there are two 
operands, a comma shall separate the two. An operand 
may be a 13-bit address or an 8-bit byte value, either 
expressed in octal. If the operand is an address, it may 
be given in two parts, separated by a blank. The first 
part consisting of the five most significant bits, and the 
second part consisting of the remaining eight bits. An 
address may also be given as a single octal number, 
but it is displayed in two parts as described. Leading 
zeros need not to be entered. 

Examples: 

TYPED VALUE DISPLAYED VALUE 



101A 

707J 

0331, 1477W 



[ 



FIRST 


SECOND 


PART 


PART 





101A 


01 


307 J 


— 


331 , 


03 


077 W 



The command being entered is displayed on lines 10 and 1 1 
of the CRT display, as shown in Figure 1. Line 10 shows the 
first operand. Line 1 1 shows the second operand and opera- 
tion. If there is only one operand, line 1 1 will be blank. If 
there are no operands, line 11 shows only the operation and 
line 10 will be blank. NOTE: In ail ensuing examples, the 
display format is used to exemplify the referenced operation. 

If an illegal character is typed, the beep signal will sound 
and the character will be ignore. The CANCEL key will 
cause the command being entered to be discarded and 
another command can be entered. 



The ENTER key will cause the command just entered to be 
executed. The command may be CANCELed at any time 
before the ENTER key is depressed. 

Command To Modify Registers Or Memory 

A, B, C, D, E, H, L 

The operations A, B, C, D, E, H or L take a single byte value 
operand. The register specified by the operation is set to the 
operand value. 

Examples: 173B sets B to 173 
00 1 A sets A to 001 
3 7 5 L sets L to 375 

Operation F 

The operation F takes a single address operand. The Zero, 
Sign, and Parity flip-flops are set as if the lower 8 bits of the 
address were the result in A of some arithmetic instruction. 
The Carry flip-flop is set to the rightmost bit of the first 
part of the address. 

Examples: F sets Zero 

resets Sign, Carry, and Parity 

1 GOOF sets Zero and Carry 

resets Sign, and Parity 

2 F sets Parity and Sign 
resets Zero and Carry 

Operation O 

The operation O takes a single address operand. It opens the 
specified location for possible modification. The contents of 
the location are shown on line 12 of the CRT display. A 
byte value can be entered followed by ; , <,or> followed 
then by ENTER. The location is set to that value. If the 
terminating character is ; , TRACE will accept another 
command. If it is <, the previous location is now opened. 
If it is >, the next location is opened. If the CANCEL key 
is used, the currently open location remains open and any 
modification for it is discarded. The modifying byte value 
is shown as it is entered, following the contents of the open 
location on the CRT display. 

Examples: 

01 115 opens 01 115 

< now opens 01 114 
> reopens 01 115 
57; sets 01 115 to 057 



6-1 



00 017 opens 00 017 

5> sets 01 7 to 005, 

opens 020 
20; sets 020 to 20 

Command To Displayed Memory 

Operation M 

The operation M takes two operands, both addresses. They 
are the lower and upper bounds respectively of the region 
of nnemory to be displayed. Sixteen bytes are displayed 
across the entire width of the CRT display. The address 
is given on one line followed by the memory contents on 
a second line. The display continues being built and rolled 
up unless the DISPLAY key is depressed. The display then 
stops until the DISPLAY key is depressed again. The 
KEYBOARD key terminates the memory display. 

Example: 000, displays the first 256 bytes of 

00 377 M memory 

Transfer Of Control Commands 

Operation K 

The operation K takes one address operand. It causes a 
Call instruction to be performed to the address given as 
the operand. Return is to TRACE. 

Example: 02 000 K calls routine at 2 000 

Operation J 

The operation J optionally takes one address operand. If 
the operand is absent, the content of the P register is used. 
It causes a Jump instruction to be performed to the 
address given as the operand or in P. 

Examples: 03 101 J jumps to 3 101 
(octal 1501) 
J jumps to address in P 

Mode Setting Commands 

Operation X 

The operation X optionally takes two address operands. 
They are the lower and upper bounds respectively of a 
region in memory. Any Call instructions into this memory 
region are actually executed rather than being simulated. 
Since TRACE loses control at this point, it is imperative 
that routines called in this region return. All registers are 
properly set when the Call is performed. The contents of 
H and L are lost on the Return. If the operation X is 
given without operands, any region in effect is removed. 



Example: 1 000 , 



03 377 X 



sets the special CALL region to 
to 1 000 to 3 377 
(octal 400 to 1777) 



Operation W 



The operation W optionally takes two address operands. 
They are the lower and upper bounds respectively. of a 
region in memory. At the completion of any instruction 
in this region, the registers contents are shown in the first 
nine (9) lines of the CRT display as shown in Figure 1. 
The contents of the Carry, Zero, Sign, and Parity flip-flops 
are shown as the letters C, Z, S, and P respectively 
on the right-hand side of the CRT display if set and blank 
is reset. If the operation W is given without operands, 
any region in effect is removed. If the regions for the X 
operation and W operation overlap, the X operation takes 
precedence. 



Example: 



12 000, 
12377W 



display the register contents after 
every instruction in 12 000 to 
12 377 (octal 5000 to 5377) 



Operation S 



The operation S optionally takes one address operand. Be- 
fore TRACE executes the instruction at the given address, 
the register contents are shown as in a W operation region 
and TRACE stops to accept commands. A J operation with 
no operands will restart the program. If the S command is 
given without an operand, any stop address in effect is 
removed. If the stop address falls within an X operation 
region, the X operation takes precedence. 



Example: 7 01 1 S 



the program will stop before the in- 
struction at 7 01 1 is executed 



To stop a program when TRACE is in control, depress the 
KEYBOARD and DISPLAY Keys at the same time. This 
has the same effect as an S operation for the current pro- 
gram address. 

If a Halt instruction is executed by TRACE, the result is the 
same, as if an S operation was set for the Halt otherwise 
ignored. 

Starting Trace 

TRACE is loaded like any other program from the operating 
system library (RUN TRACE). Once started, it will request 
the name of the program desired to TRACE. The name of the 
program must be typed, followed by ENTER. CANCEL will 
cause TRACE to ask again. The named program will be 
loaded using the symbolic linker and loader in the operating 
system, and TRACE will show the register contents as if the 
program had been stopped at its entry point. P and I will be 
the only registers with non-zero contents. 
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To TRACE a program already in memory, simply depress the 
ENTER key without entering a program name, then jump to 
the entry point of the traced program, using the J command. 

To TRACE a program located on the front deck type * and 
depress the ENTER key. The object file (file #1) from the 
front tape will be loaded using the operating system loader, 
and TRACE will show the register contents as if the program 
had been stopped at its entry point. P and I will be the only 
registers with non-zero contents. 

Operational Summary 

A Set A to operand 

B Set B to operand 

C Set C to operand 

D Set D to operand 

E Set E to operand 

H Set H to operand 

L Set L to operand 

F Set flip-flops from operands 

Open location 

J Jump 

K Call 

M Display memory 

X Set special CALL region 

W Set register display region 

S Set stop address 
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7.1.1 INTRODUCTION 

STATH is a subroutine package specifically designed to 
provide formatted keyboard input, screen display, checksum 
and arithmetic operations on numeric strings. Each function 
of STATH is obtained by calling the entry point associated 
with that function. 

Following is a list of the functions available through STATH. 
The labels given to their entry points and the sections incor- 
porating their usage parameters: 
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Entry Point 


Function 


ADDS 


Addition 


COMS 


Compare Magnitude 


DIV$ 


Division 


DSPS 


Display on screen 


KEYS 


Keyboard formatted 




Input 


MOD 10$ 


MOD lOchecksum" 




calculation 


M0D11$ 


MOD 1 1 checksum 




calculation 


MOV$ 


Move string 


MUL$ 


Multiply 


SUBS 


Subtract 


.1 INTRODUCTION TO STRINGS -NUMERIC 



AND OTHERWISE 



The purpose of a 'string' is to carry around a 'package' of 
text. A string is an individual block of text and just like a 
string it has a definite beginning and end. The composition 
of the string is an uninterrupted sequence of ASCII charac- 
ters. That is, between the beginning and end of the string 
only ASCII characters are allowed. The ASCII character 
may be any of the 95 plus space (blank) characters listed in 
Section 1 of the Programmers' Manual (2200 Reference 
Manual). 

The string is bounded at the beginning and end in different 
ways. The end is determined by the first occurrence of the 
ASCII 'ETX' whicn is equal to (003g) in the sequence of 
characters called the string. The 003 tells STATH that the 
string is ended. The CTOS will also accept a carriage return 
character (01 53) in place of the 003 but STATH only 
accepts the 003. 

The following are valid strings. The contents of the paren- 
theses are intended to be the byte value of the ASCII 
character for single character values or the octal value of 
the octal triple such as 003. 



(N) (0) (W) ( 
(E) (003) 



)(I)(S)( )(T)(H)(E)( )(T)(I)(M) 



(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (0) (003) 

Which are in octal: 

116,117,127,040,111,123,040,124,110,105,040,124,111, 
115,105,003 

and 

060,061,062,063,064,065,066,067,070,071,003 

Although a string has an inherent end built into Itself, the 
003, there is no beginning. At least no beginning which 
itself is part of the string of characters in memory. The 
beginning is combined with the pointer to the string itself. 
That is, a string is referred to by calling out a location 
in memory. That location is the first character of the string. 
In the above samples, for 'now is the time' to be referred to 
beginning with the word 'now' the location of the letter 'N' 
would be specified. It is clear that specifying only the 'N' 
yields a complete description which is: 

'Begin with the character in the location specified and con- 
tinue until a 003 is reached.' 

Beginning with 'N' and continuing to the 003 gives: 'Now 
is the time'. If the location of the letter 'W' in now were 
specified, the string string resulting would be 'w is the time'. 

Therefore, to specify a string to a routine (like STATH) which 
is going to use the string, the user must only transfer the 
address of the first character of the string or the character 
in the string the user wants to begin the string (it may not 
be the first) to the routine. Also, if the user created the 
string, he must be assured that there is a terminating 003 
byte immediately following the last character of the string 
in memory. 

STATH differentiates between two catagories of strings: 

1) Numeric strings 
and 

2) Non-numeric strings 

Where numeric strings are only regular strings with the 
character set restricted the characters 012345689 with an 
optional single period representing the decimal point and/or 
a single hypen leading the string representing a minus sign. 

A non-numeric string is any string which is not numeric by 
the above definition. 

A numeric string (ommitting temporarily the 003) can look 
like: 
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00000034567788888777.9999999999991 



7.1.2 STATH FUNCTIONS AND ARGUMENTS 



or 



-123.45 



34.5000000000 

There is a size limit as to the number of characters a string 
may have in STATH. This is not true of ordinary text strings 
in CTOS where a string may, for some strange purpose, have 
thousands of characters in it. STATH is a mathematic pack- 
age and the numeric strings represent numbers. The largest 
number of digits, therefore, is limited in STATH and that 
limit is 126. 

7.1.1.2 INTRODUCTION TO THE FUNCTIONS OF 
STATH 

STATH functions fall in the following four catagories. The 
categories are listed with their appropriate functions below. 

Arithmetic Analysis Manipulative Input/Output 



Each routine takes one or two arguments. An argument 
consists of a CTOS-compatable string. The argument strings 
are bounded at the end by an ASCII ETX (=003), and the 
beginning boundry is determined by the address contained 
in the register-pair associated with that argument. The 
maximum size for any STATH string is 126 characters. This 
means arguments and results are limited each to 126 digits. 

Except for the routine DSP$, all strings must be 'numbers' 
which means a sequence only of ASCII numeric digits 
(0123456789) with an optional decimal point. Optional 
leading minus sign and optional leading blanks (an octal 
040). The number must be right justified in the argument 
string. All strings except for DSP$ set the condition flags 
as follows: 

Flag Indication 

Zero The result was zero 

Sign The result was negative 

Carry An overflow occured 

Parity One or both arguments were improperly for- 

matted 



Addition 



Compare 



Subtraction MOD 10 

Check 
Division M0D11 

Check 
Multiplica- 
tion 



Move Keyboard format- 

ted input 
Display on screen 



If parity is not set at the end of an operation, HL and DE 
contain the addresses of the location in memory past their 
respective ETX's. In the case of KEY$ and DSP$, D con- 
tains the column and E contains the row of the position 
immediately beyond the display area used. MUL$ and 
DIV$ leave D and E with junk in them. MOD10 and M0D11 
leave H and L containing the address of the check digit 
position. 



The arithmetic functions are the normal functions with 
which everyone is familiar. 

The analysis functions permit decisions to be made on the 
content of a number. MOD10 and MOD1 1 verify the check- 
sum Modulo 10 or 11 as is used In many business applica- 
tions. Compare will permit comparing two numbers to deter- 
mine equality or relative magnitude. 

The move function is necessary as a preparation for using 
the multiplication and division functions in STATH, appli- 
cable for general use in the user's program to move numeric 
strings from one location to another and to format and 
round them in the process. 

The input/output functions provide the user with simple 
techniques for bringing numbers into memory from the key- 
board and displaying string numbers in memory onto the 
screen. 



7.1.2.1 EXAMPLES ON THE USE OF STATH 

Following is a 488-byte program which is a useful desk 
calculator using STATH. It is included as an example of a 
program calling STATH functions. 

'DCLAC, the desk calculator, inputs a numeric string and 
provides addition, subtraction, multiplication or division 
of that inputted string against an accumulator. 'DCALC 
always inputs the string from the keyboard into a string 
labeled 'input'. The accumulator is in a string labeled 
'accum'. 

The four arithmetic operations performed In the program 
are routines labeled as 'ADDOP', 'SUBOP', 'MULOP', and 
'DIVOP'. The routines are very short but demonstrate the 
use of STATH. 
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SET 


01000 


BOOTS 


EQU 


064 


MOV$ 


EOU 


010000 


ADDS 


EQU 


010003 


SUB$ 


EQU 


010006 


MUL$ 


EQU 


06000 


DIV$ 


EQU 


06003 


KEYS 


EQU 


010014 


DSPS 


EQU 


010017 


KEVINS 


EQU 


017000 


DSPLYS 


EQU 


017151 


M LOADS 


EQU 


017620 


BEEP 


EQU 


13 


HEADING 


DC 


021,811,20,2 20 




DC 


013,5,01 1,31,Total' 




DC 


013,7,01 1,28,'Keyboard' 




DC 


013,2,011,28,'0To9' 




DC 


'Decimal Places?' 


DECPL 


DC 


'0',3 


OVFMSG 


DC 


'Overflow', 3 


BLANK 


DC 


',3 


CLEAR 


DC 


022,3 


INPUT 


DC 


'0000000000',3 


ACCUM 


DC 


'00000000000',3 


DIVID 


DC 


'0000000000000000000000', 3 


NAME1 


DC 


'Stath' 


OPCODE 


DC 


' ',815 


DCALC 


DE 


NAME1 




CALL 


MLOADS 




JFZ 


BOOTS 


DCALCH 


DE 







HL 


HEADING 




CALL 


DSPLYS 




LD 


51 




LE 


2 




HL 


DECPL 




CALL 


KEYS 




LL 


INPUT 




CALL 


FILLIN 




LL 


ACCUM 




CALL 


FILLIN 




LL 


DIVID 




CALL 


FILLIN 




LL 


DECPL 




LAM 






SU 


'0' 




LBA 






LC 


' ' 




LA 


INPUT+10 




SUB 






LLA 






LMC 






LA 


ACCUM+10 




SUB 






LLA 






LMC 






LAB 






SLC 





LBR 




LA 


DIVID+20 


SUB 




LLA 




LMC 




LD 


28 


LE 


2 


HL 


CLEAR 


CALL 


DSPLYS 


DE 


ACCUM 


HL 


ACCUM 


CALL 


SUBS 


DCALCL LD 


38 


LE 


5 


HL 


ACCUM 


CALL 


DSPS 


LD 


50 


LE 


7 


HL 


BLANK+6 


CALL 


DSPS 


LE 


38 


LE 


7 


HL 


INPUT 


CALL 


KEYS 


LC 


1 


LE 


50 


LE 


7 


HL 


OPCODE 


CALL 


KEYINS 


HL 


OPCODE 


LAM 




CP 


015 


JTZ 


ADDOP 


CP 


'A' 


JTZ 


ADDOP 


CP 


'S' 


JTZ 


SUBOP 


CP 


'M' 


JTZ 


MULOP 


CP 


'D' 


JTZ 


DIVOP 


CP 


'E' 


JTZ 


MOVOP 


CP 


'R' 


JTZ 


DCALCH 


EX 


BEEP 


JMP 


DCALCL 


ADDOP DE 


INPUT 


HL 


ACCUM 


CALL 


ADDS 


OVFTST JFC 


NOOVF 


LD 


36 


LE 


3 


HL 


OVFMSG 


CALL 


DSPS 


EX 


BEEP 


JMP 


DCALCL 


NOOVF LE 


36 
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SUBOP 



MULOP 



MOVOP 



DIVOP 



FILLIN 



LE 


3 


HL 


BLANK 


CALL 


DSP$ 


JMP 


DCALCL 


DE 


INPUT 


HL 


AGCUM 


CALL 


SUB$ 


JMP 


OVFTST 


DE 


ACCUM 


HL 


ACCUM 


CALL 


MOV$ 


DE 


INPUT 


HL 


ACCUM 


CALL 


MUL$ 


JMP 


OVFTST 


DE 


INPUT 


HL 


ACCUM 


CALL 


MOV$ 


JMP 


OVFTST 


DE 


ACCUM 


HL 


DIVID 


CALL 


MOV$ 


DE 


INPUT 


HL 


ACCUM 


CALL 


DIV$ 


JMP 


OVFTST 


LAM 




CP 


3 


RTZ 




LA 


'0' 


LMA 




LAL 




AD 


1 


LLA 




JMP 


FILLIN 


END 


DCALC 



Observe the addition routine, 'ADDOP'. To add together 
the inputted string 'input' to the accumulator 'accum' the 
user only writes the following code as found at 'ADDOP'. 

ADDOP DE INPUT 

HL ACCUM 

CALL ADD$ 

Executing this code will cause string 'input' to be added to 
the string 'accum' with the result in the string 'accum'. The 
accumulator, it must be realized, is simply a string which 
the writer of 'DCALC is using as his result string and he 
preferred to call it an accumulator. 

Note that after each operation there is a jump to 'OVFTST' 
or as in 'ADDOP', the code is immediately after and executed 
right after 'ADDOP'. Observe that the first instruction 



OVFTST JFCNOOVF 

of the overflow test is the actual test: If the carry isn't set 
then there was no overflow resulting from the operation. If 
the carry was set, in 'DCALC the message 'overflow' is 
printed on the screen as is seen from the code following 
the 'JFC NOOVF'. 

Subtraction behaves the same as addition except for the 
CALL to SUB$. 

Multiplication and division are slightly different from 
addition and subtraction but operate similar to each other. 
Observe the following code as taken from 'DCALC. 



MULOf 


' DE 


ACCUM 




HL 


ACCUM 




CALL 


MOV$ 




DE 


INPUT 




HL 


ACCUM 




CALL 


MUL$ 




JMP 


OVFTST 



This demonstrates the requirement, as stated in 7.1.5, that, 
in MUL$ and DIV$, the argument #2 must be the result 
of the previous move. The reason for this is that multipli- 
cation and division really require three 'registers' or strings: 
The two strings being multiplied and the result. The 'MOV$' 
move operation makes a copy of whatever is being moved, 
during the move, in an internal STATH 'register' string. 
Therefore, note that the first three instructions in 
'MULOP' cause the accumulator to be 'MOV$' moved to 
itself. Frequently the user can save time by utilizing this 
fact in making the last move before calling 'MUL$' a move 
of a string involving argument #2. (Again, argument #2 
is the argument associated with the H and L registers). 

Also note that 'MULOP' tests overflow using the same 
routine that is used for the other three arithmetic routines 
'OVFTST' as described above. 

7.1.3 LOADING STATH 

STATH may be loaded in memory in either of two ways: 

1) Incorporating the source code of STATH into the prob- 
lem source code. 

2) Catalog STATH as an object file and call it in through the 
operating system. 

The second is preferred and simpler, as is done in 'DCALC. 
Once cataloged, the following calls STATH into memory: 

NAME1 DC 'STATH' 

DE NAME1 

CALL BOOTS 
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7.1.3 ADDITION 



7.1.4 SUBTRACTION 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 
Arithmetic Function 



ADD$ 

10003 Octal 

D-E Registers 

H-L Registers 

Argument #2 

(Argument #2) = (Argument 

#2) + (Argument #1) 



Action: 

Adds two numeric string numbers, rounds, and installs 
leading blanks and trailing zeros wlien needed in the result. 

Typical calling sequence: 

ADD$ EQU 010003 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 
Arithmetic Function 



SUB$ 

10006 Octal 

D-E Registers 

H-L Registers 

Argument #2 

(Argument #2) = (Argument 

#2)- (Argument #1) 



Action: 

Subtracts one numeric string number from another, 
rounds and installs leading blanks and trailing zeros when 
needed in the result. 

Typical calling sequence: 



DE ARG1 
HL ARG2 
CALL ADD$ 

Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. 

Result: 

The contents of argument 1 (D and E) will remain un- 
changed. 

The contents of argument 2 (H and L) will contain the 
sum of arguments 2 and 1 and will have leading blanks 
and trailing zeros when needed. 

Changes: 

The contents of argument 2 are changed to contain the 
result. 

Errors Recognized: 

Improper argument format (parity bit set) 
Overflow occurrence (carry bit set) 

Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 



SUB$ 



EQU 



010006 



DE 


ARG1 


HL 


ARG2 


CALL 


SUBS 



Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. 

Result: 

The contents of argument 1 (D and E) will remain un- 
changed. 

The contents of argument 2 (H and L) will contain the 
difference of arguments 2 and 1 and will have leading 
blanks and trailing zeros when needed. 

Changes: 

The contents of argument 2 are changed to contain the 
result. 

Errors Recognized: 

Improper argument format (parity bit set) 
Overflow occurrence (carry bit is set) 

Comparison Flags: 

Result was zero (zero bit is set) 
Result was negative (sign bit is set) 
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7.1.5 MULTIPLICATION 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 
Arithmetic Function 

Argument Restrictions 



MUL$ 

6000 Octal 

D-E Registers 

H-L Registers 

Argument #2 

(Argument #2) = (Argument 

#2) X (Argument #1) 

Argument #2 must be result of 

last MOV$ call 



Action: 

Multiplies two numeric string numbers, rounds and in- 
stalls leading blanks and trailing zeros when needed in the 
result. 

Typical calling sequence: 

MUL$ EQU 06000 



DE 


ARG1 


HL 


ARG2 


CALL 


MOV$ 


DE 


ARG1, 


HL 


ARG2 


CALL 


IVIUL$ 



Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. Argument 2 must have been 
involved in the previous move operation. 

Result: 

The contents of argument 1 (D and E) will remain un- 
changed. 

The contents of argument 2 (H and L) will contain the 
product of arguments 2 and 1 and will have leading 
blanks and trailing zeros when needed. 

Changes: 

The contents of argument 2 are changed to contain the 
result. 

Errors Recognized: 

Improper argument format (parity bit set) 
Overflow occurrence (carry bit set) 

Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 
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7.1.6 DIVISION 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 
Arithmetic Function 

Argument Restrictions 



DIV$ 

6003 Octal 

D-E Registers 

H-L Registers 

Argument #2 

(Argument #2) = (Argument 

#2)/ (Argument #1) 

Argument #2 must be result of 

last MOV$ call 



Action: 

Divides one numeric string number into another, rounds 
and installs leading blanks and trailing zeros when needed 
in the result. 

Typical calling sequence: 

MOV$ EQU 010000 



DE 


ARG1 


HL 


ARG2 


CALL 


MOV$ 



DIV$ 



EQU 



06003 



DE 


ARG1 


HL 


ARG2 


CALL 


DIV$ 



Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. Argument 2 must have been 
involved in the previous move operation. 

Result: 

The contents of argument 1 (D and E) will remain un- 
changed. 

The contents of argument 2 (H and L) will contain the 
result of the division of argument 1 into argument 2 and 
will have leading blanks and trailing zeros when needed. 
The number of decimal places in the result is equal to 
the number of decimal places in the dividend less the 
number of decimal places in the divisor. This number 
may not be negative and if it is, the number of decimal 
places is extended to make the difference zero. 
The size of the result equals the size of the extended 
dividend less the size of the divisor. 
Note that the string '10.0' divided by the string '3.0' 
is the string '3'. It is rounded to ZERO decimal places. 

Changes: 

The contents of argument 2 are changed to contain the 
result. 

Errors Recognized: 

Improper argument format (parity bit set) 
Overflow-occurrence (carry bit set) 



Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 
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7.1.7 COMPARE 



7.1.8 IVIOVE 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 

Arithmetic Function 



COiVI$ 
10011 Octal 
D-E Registers 
H-L Registers 

Arguments unchanged. Only 
sets condition code 
(cond-code) = (cond [ (Argu- 
ment #2) - (Argument #1) ] 



Action: 

Compares two numeric string numbers as to magnitude. 
No change to arguments results. Changes are only made to 
the condition flags. 



Typical calling sequence: 



COM$ 



EOU 



010011 



DE 


ARG1 


HL 


ARG2 


CALL 


COM$ 



Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. 

Result: 

The contents of both arguments will remain unchanged. 
Only the condition code will change and will obtain the 
exact same condition as if a call to SUB$ were done. 
Therefore, the resultant condition flags will behave as if 
the result were to be rounded. 

Changes: 

The contents of both arguments remain unchanged. 
Only the condition flags are changed. 

Errors Recognized: 

Improper argument format (parity bit set) 
Overflow occurrence (carry bit set) 

Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Argument #2 Address 
Result Location 
Arithmetic Function 



MOV$ 

10000 Octal 

D-E Registers 

H-L Registers 

Argument #2 

(Argument #2) = (Argument 

#1) 



Action: 

Replaces the numeric string number in argument 2 with 
that of argument 1, rounds and installs leading blanks and 
trailing zeros when needed in the result. 

Typical calling sequence: 

MOV$ EQU 010000 

DE ARG1 

HL ARG2 

CALL MOV$ 

Arguments: 

Arguments must be each numeric strings of less than 126 
characters in length. Argument 1 is addressed by the D and 
E Registers. Argument 2 is addressed by the H and L Regis- 
ters and will contain the result. 

Result: 

The contents of argument 1 (D and E) will remain un- 
changed. 

The contents of argument 2 (H and L) will contain the 
number of argument 1 rounded and reformatted if 
necessary. 

Changes: 

The contents of argument 2 are changed to contain the 
result. 

Errors Recognized: 

Improper argument format (parity bit set) 

Overflow occurrence (carry bit set) 

[Note that overflow can occur in a MOV$ if a move from 

a larger to smaller field is attempted] 

Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 
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7.1.9 MOD10 CHECKSUM CALCULATION 



7.1.10 MOD1 1 CHECKSUM CALCULATION 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Result Location 

Arithmetic Function 



MOD10$ 

6006 Octal 

H-L Registers 

A- Register (no reformatting 

of argument) 

(A Reg) = Check-MOD-10 

(Argument #1) 



Action: 

Checks validity of Modulo 10 checksum of a numeric 
string number. 

Typical calling sequence: 

MOD 10$ EQU 06006 



HL 
CALL 



ARG1 
MOD10$ 



Arguments: 

The argument must be a numeric string of less than 1 26 
characters in length. Argument 1 is addressed by the H and 
L Registers. 

Result: 

The contents of the argument remains unchanged. 
The carry bit is set if the check digit is 10. 
The zero bit is set if the check digit is not 10. 
The check digit is in the A-Register upon return. 

Changes: 

The contents of the argument remain unchanged. 

Errors Recognized: 

Improper argument format (parity bit set) 

Comparison Flags: 

Check digit was 10 (carry bit set) 
Check digit was not 10 (zero bit set) 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Result Location 

Arithmetic Function 



M0D11$ 

601 1 Octal 

H-L Registers 

A-Register (no reformatting 

of argument) 

(A Reg) = Check-MOD-10 

(Argument #1) 



Action: 

Verifies the Modulo 1 1 checksum of the numeric 
string number. 

Typical calling sequence: 

M0D11$ EQU 06011 



HL 
CALL 



ARG1 
M0D11$ 



Arguments: 

The argument must be a numeric string of less than 126 
characters in length. The argument is addressed by the H and 
L Registers. 

Result: 

The contents of the argument remains unchanged. 
The carry bit is set if the check digit is 1 1. 
The zero bit is set if the check digit is not 1 1 . 
The A-Register contains the check digit. 

Changes: 

The contents of the argument remain unchanged. 

Errors Recognized: 

Improper argument format (parity bit set) 

Comparison Flags: 

Check digit was 1 1 (carry bit set) 
Check digit was not 1 1 (zero bit set) 
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7.1.11 KEYBOARD FORMATTED INPUT 



7.1.12 DISPLAY STRING 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Extra Parameters 

Input Function 

Input Restrictions 



KEYS 

10014 Octal 
H-L Registers 

(D Reg) = Column. (E Reg) = 
Row for cursor 
(Argument #1) = (Keyed in 
number) 

Screen format and, therefore, 
keyed in number has same 
format as originally in Argu- 
ment #1 



Action: 

Provides formatted input from the keyboard into a 
numeric string. The format is maintained on the screen and 
only a number fitting the format can be entered. The 
inputted numeric string is placed in argument 1. 



Typical calling sequence: 
KEYS EQU 010014 



LD 


COLUMN 


LE 


ROW 


HL 


ARG1 


CALL 


KEYS 



Arguments: 

The argument must be a formatted numeric string. 
The D and E Registers must contain the column and 
row of the cursor position of the first character to be 
typed in. 

Result: 

The contents of argument 1 are replaced by the inputted 

number. 

Striking the enter key with no input will cause the 

argument to be replaced with a zero. 

The H and L Registers are pointing immediately after 

the ETX. 

Changes: 

The contents of the argument are replaced with the input- 
ted string 

Errors Recognized: 

Improper argument format (parity bit set) 

Comparison Flags: 

Result was zero (zero bit set) 
Result was negative (sign bit set) 



Entry Point Name 
Entry Point Address 
Argument #1 Address 
Extra Parameters 

Input Functions 

Input Restrictions 



DSPS 

10017 Octal 

H-L Registers 

(D Reg) = Column. (E Reg) = 

Row for cursor 

(Display starting at.D.E) = 

(Argument #1) 

None. May even be non-numeric 

string 



Action: 

Displays a string onto the screen. String may be non- 
numeric. 

Typical calling sequence: 

DSPS EQU 010017 

LD COLUMN 

LE ROW 

HL ARG1 

CALL DSPS 

Arguments: 

The argument may be a numeric or non-numeric string 
as long as it terminates with an ETX. The D and E Regis- 
ters contain the column and row of the location of the 
first character of the string. 

Result: 

The string in argument 1 is displayed on the screen 
starting at the cursor location beginning with the 
column and row specified by the D and E Registers. 
The H and L Registers point the location immediately 
after the ETX in argument 1. 

Changes: 

The contents of the argument remain unchanged. 

Errors Recognized: 
None 

Comparison Flags: 

None 
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7.2.1 INTRODUCTION 



FPAK is a subroutine package which gives the Datapoint 
2200 the capability of performing numerical operations 
with numbers in the range of -lO'^s to 1037. This is 
accomplished by representing all numbers in a form called 
"floating point." Floating point notation is a shorthand 
method of number representation and is very similar to the 
familiar "scientific notation" used in technical work. 

FPAK also provides conversion of floating point numbers 
to and from 16 bit binary integers, particularly attractive 
for analy^ing binary data gathered by the 2200 from in- 
strumentation systems. 



sign bit 

for 

exponent 



Sign bit for fraction 



8 bits 



24 bits 



_-> v_ 



exponent 



fraction 



Supplied with FPAK is FCON which supplies the user with 
simple conversion of ASCII numeric string respresentation 
(suitable for displaying or printing) to and from the internal 
floating point representation. 



The CTC 2200 floating point software consists of two main 
sections: FCON, the conversion section and FPAK, the 
arithmetic section. The conversion section converts a float- 
ing point number to an ASCII string, and visa versa. ASCII 
is the character code used by the 2200 keyboard and CRT 
display, and this section of the floating point software 
allows the user to interface with the computer. The user 
can enter numbers in a form familiar to him and read the 
results in a similar form. The ASCII string which the user 
enters through the keyboard (or from tape or some other 
means) is converted into the internal floating point form 
outlined in Section 7.2.1.1. When all arithmetic operations 
are completed, the user can request that the result be con- 
verted back into ASCII for display on the CRT (or for 
output to tape or for some other use). 

7.2.1.1 INTRODUCTION TO FLOATING POINT RE- 
PRESENTATION 



The exponent and the fraction are separate parts of the 
number, and one can be positive while the other is negative. 
On the 2200, negative numbers are represented in their 
2's complement form. Since the floating point representa- 
tion requires more than one byte (word) on the 2200, a 
convention is used to address a floating point number in 
memory. The address of a floating point number is the byte 
(word) address of the exponent byte of the number. The 
software will use the addressed byte, and the three bytes 
immediately following, in whatever operation is being 
performed. Later in the documentation, reference is made 
to addressing floating point numbers. In such cases, this 
means that the MSP of the address of the exponent should 
be in the H or D register and the LSP of the address should 
be in the L or E register, depending upon whether the HL or 
DE pair is being used. 



A number (N) in floating point form consists of two parts 
within the computer's memory-the "exponent" (e) and the 
"fraction" (f) -such that: N = f*2^ (where the * denotes 
the multiplication operation). The exponent occupies one 
byte (word) in the 2200 and is an 8 bit signed integer. Thus, 
exponents on the 2200 can have a range of 127 to -128. 

The fraction (sometimes called the "mantissa") on the 2200 
occupies three bytes and is a 24 bit signed quantity. Like a 
decimal fraction (such as .5 or .0001), the fraction in a 
floating point number has a "decimal point," although 
"decimal point" is not what it is called. Its proper name, in 
a binary fraction, is a "binary point." In the notation used 
on the 2200, the binary point is located immediately to 
the right of the sign bit (high order bit) of the fraction. 
Thus, a picture of a 2200 floating point number would look 
like this: 
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7.2.2 FCON - FLOATING POINT/STRING CON- 
VERSION 

7.2.2.1 INTRODUCTION TO FCON - FLOATING POINT/ 
STRING CONVERSION 



FISC 



EQU 



04441 



LOCATION 



FUNCTION 



FISC (0441) Floating Internal to String Conversion 

entry point 

FSIC (04444) Floating String to Internal Conversion 

entry point 

FSCE (04460) Floating Set Conversion Error Branch 

entry point 

OPER (013403) Location of Floating point number to 
be converted to or from ASCII 

7.2.2.2 FISC - FLOATING INTERNAL TO STRING CON- 
VERSION 

The Floating Internal to String Conversion routine has been 
designed so that the user need not specify the type of num- 
ber he is going to supply. That is, as long as the ASCII 
characters being converted represent a valid, decimal num- 
ber, the conversion routine can decide what type of num- 
ber it is (i.e., integer, fraction) and perform the proper 
conversion without any further instructions. This type of 
input is referred to as "free form" input. 

The result of all Floating Point Arithmetic routines end up 
at location 013403, labeled 'OPER'. The conversion routine, 
FISC, converts floating point numbers at OPER into a 
string beginning at the location specified by the H and L 
Registers upon execution of the CALL to FISC. 

For example, should OPER (and the subsequent 3 bytes) 
contain the floating point number represented by 
123,450,000,000,000,000,000 the string resulting from a 
call to FISC would look like this: 1.2345E20 where the 
ASCII number 1, an octal 61, would appear in the location 
specified by H and L and the period (an octal 056) in 
H and L plus 1 etc. A note of caution, FISC does not put 
a terminating 003 or 015 after the string. To be compatible 
with the CTOS string routines, the string must be terminated 
with either 003 or 015. However, FISC, upon return from 
being called, leaves the H and L registers pointing to the 
location immediately after the last character in the string. 
This enables the user to immediately store the terminating 
character of his choice (003 or 015) in that location upon 
a return. The following call to FISC will illustrate: 



HL 


String 


CALL 


FISC 


LA 


015 


LMA 





Note the LA 015 and LMA will Install a 015 as the termi- 
nating character to the resultant string which is the ASCII 
representation of the floating point number in OPER. 
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Name: Floating Internal to String Conversion (FISC) 

Action: 

Converts a floating point number to its ASCI I character 
representation. 

Calling Sequence: 



FISC 



EQU 


04441 


HL 


String 


CALL 


FISC 


LA 


015 


LMA 





Arguments: 

OPER contains the number to be converted to ASCII. 
The H and L registers contain the address of the location, 
in memory, where the first (leftmost) ASCII character 
should be placed. 

Result: 

The floating point number in OPER is converted to its 
ASCII representation, and the ASCII characters comprising 
this representation are placed in memory, beginning at the 
address specified by the contents of the H and L registers 
and continuing in sequential memory locations. H and L 
end up pointing to the next location after the last string 
character enabling the user to store the string termination 
character of his choice up on the return from FISC. 

Changes: 

The contents of OPER are destroyed; the previous con- 
tents of the output string are destroyed. At the end of the 
execution of this routine, H and L contain the address of 
the memory location immediately after the last ASCII 
character in the converted number. 

Errors Recognized: 
None. 

Comments: 

Numbers are represented to six significant (decimal) digits 
and are rounded where appropriate. The format of the out- 
put is "free," with small integer in FORTRAN I format, 
floating point numbers with decimal exponents between -6 
and 6 in FORTRAN F format, and other numbers in 
FORTRAN E format. 



7.2.2.3 FSCI - FLOATING STRING TO INTERNAL CON- 
VERSION 

The Floating String to Internal Conversion routine has been 
designed to convert floating point numbers into the proper 
ASCII representation. If the floating point numeric string 
is a small integer, it will be converted to an integer, with no 
decimal point in the representation. If the numeric string 
is a large integer, or a noninteger, it will be converted into 
scientific notation, or more precisely what is known as the 
FORTRAN E format, such as 1.3456E17. 

FSIC converts to internal floating point representation an 
ASCII numeric string with optional leading minus sign, 
optional decimal point, and optional trailing FORTRAN E, 
type exponent, i.e. -1.2345E20. The H and L registers must 
point to the first character of the string. The result goes into 
the FPAK 'register' called OPER starting at 013403, ready 
to be used by FPAK. FSCE, Floating Set Conversion Error 
Branch, should be set first to cover format problems in the 
string being converted. A simple call to FSCE with the D 
and E registers specifying the location of your error recovery 
routine will set the error branch. 
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Name: Floating String to Internal Conversion (FSIC) 

Action: 

Converts an ASCII string, which represents a decimal 
number, into that number's floating point form. 

Calling Sequence: 



7.2.2.4 FSCE - FLOATING SET CONVERSION ERROR 
BRANCH 

Name: Floating Set Conversion Error Branch (FSCE) 

Action: 

Specifies the location of the user's routine to be branched 
to in the event an invalid character is encountered while 



FSIC 


ECU 


04444 




converting an ASCI 


1 representation of a number to the 


FSCE 


EQU 


04460 




floating point representation of that number. 




DE 


ERROU 


Location of error 
routine 


Calling Sequence: 






CALL 


FSCE 




DE 


ERROU Location of error 




HL 


String 






routine 




CALL 


FSIC 




CALL 


FSCE 



Arguments: 

The H and L registers contain the address of the first 
byte (character) of the ASCII string which represents the 
number to be converted. 

Result: 

The character string, if it represents a valid number, is 
converted to a floating point number, and that value is left 
in OPER. The result in OPER is normalized and rounded. 

Changes: 

The original contents of OPER are destroyed; the ASCII 
string is left unchanged, and upon successful conversion, the 
H and L registers contain an address of the character which 
caused termination of the number (i.e., was a character not 
allowed in the ASCII representation of a number). 

Errors Recognized: 

Invalid character found while converting from ASCII to 
floating point. 

Comments: 

The ASCII string may be in free form, that is, in 
FORTRAN I, F, or E format. All of those formats will be 
properly converted by this routine. Conversion stops when 
an invalid character (something other than a digit, "E", +, 
— , or .) is encountered after a valid number has been found. 
An invalid character encountered before a valid number 
has been found will generate an error. Some of the above 
characters can be considered invalid if used incorrectly 
(i.e., a "." in an exponent, such as 1.333E1.5, is an error) 
and will generate an error condition. 



Arguments: 

The D and E registers contain the address of the error 
routine. 

Result: 

The location in the floating point software which specifies 
the location of the error routine is set to the address provided 
by the user in the D and E registers. 

Changes: 

The previous error routine address is destroyed. 

Errors Recognized: 
None. 

Comments: 

In the event the user does not specify an error routine 
location, the floating point software will execute a return 
(RET instruction) if the error condition arises, and the 
arithmetic routine called by the user will continue to com- 
pletion. At the conclusion of that routine, the contents of 
the A register will be non-zero, and the result in OPER 
will, in general, be erroneous. The user's error routine may 
end with a return if the user wishes to continue execution 
immediately after the call to the routine which generated 
the error. 
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7.2.3 FPAK - FLOATING POINT ARITHMETIC 
PACKAGE 

7.2.3.1 INTRODUCTION TO FPAK - FLOATING POINT 
ARITHMETIC PACKAGE 

LOCATION FUNCTION 

FCMP (04422) Floating Point Compare 

FADD (04400) Floating Point Addition 

FSUB (04403) Floating Point Subtraction 

FMUL (04406) Floating Point Multiplication 

FDIV (0441 1) Floating Point Division 

FLOD (04414) Floating Point Load [memory to 

'OPER'] 
FSTO (04417) Floating Point Store ['OPER' to 

memory] 
FN EG (04425) Floating Point Negate [Two's 

complement] 
FABS (04430) Floating Point Absolute Value 

FSTL (04463) Floating Point Set Tolerance [For 

Equal Flag] 
FFIX (04433) Floating Point Fix [to 16 bit 

integer] 
FFLT (04436) Floating Point Float Conversion 

from 16 bit integer 
FSOV (04447) Floating Point Set Overflow Error 

Branch 
FSUN (04452) Floating Point Set Underflow Error 

Branch 
FSDV (04455) Floating Point Set Divide Check 

Error Branch 

The second section of the floating point software is the 
arithmetic part. This section contains the routines for per- 
forming the common arithmetic operations of add, sub- 
tract, multiply, divide, compare, negate, and absolute 
value, and two routines for converting between integer 
and floating point formats (an integer, in the floating point 
software, is a 16 bit (2-byte) signed quantity which is 
addressed by specifying the address of the high order byte). 

Within the floating point software package is a 4-byte area 
called OPER. OPER is to the floating point software what 
the A register is to the 2200 processor. Floating point 
operations are performed on numbers in OPER, or on pairs 
of numbers, one of which is in OPER and the other in 
memory. The software supplies two routines, FLOD and 
FSTO which provide the user with the capability of 
copying numbers from memory to OPER and from OPER 
to memory. 

With two exceptions, all of the routines in the arithmetic 
part of the floating point software, which take floating 
point numbers as their arguments, expect their operands 
to be "normalized." Normalization is nothing more than 
an agreed upon standard for writing a floating point num- 



ber. A number is considered normalized if the sign bit of 
the fraction and the bit immediately to the right of the 
sign bit (the high order bit of the fraction) are unequal. 
Thus, a positive fraction (sign bit 0) has a 1 as its high order 
bit, and a negative fraction (sign bit 1) has a as its high 
order bit. This convention makes sure that the maximum 
precision possible is maintained in all floating point 
operations. 

As a rule, all routines expect their floating point operands 
to be normalized. The significant exceptions to this rule 
are the add and subtract routines, FADD and FSUB. If 
the user is adding or subtracting two numbers, the numbers 
should be normalized for a result with the greatest 
accuracy possible. However, if the user has a floating point 
number which is not normalized, he can convert the num- 
ber to its normalized form by adding or subtracting a 
"normal" to or from the unnormalized number. A normal 
has a fraction equal to and an exponent of -128 (200 
octal). Except in this case, it is not recommended that the 
user perform operations on unnormalized numbers. 

7.2.3.2 ERROR CONDITIONS 

There are several error conditions that can arise during the 
course of executing routines in the floating point software 
package. These errors are: 

exponent overflow 
exponent underflow 
divisor of (in FDIV) 

For these errors, a flag (see below) is set to 1 when the 
error is detected. For all of these errors, an "error branch" 
is provided. When the error condition arises, the appropriate 
flag (or A register) is set, and a jump is made to a location 
in the floating point software package. This location con- 
tains a jump to the address of either a user-specified error 
routine or a return instruction (the default case if the user 
does not supply an error routine). There is a separate 
location for each error condition, and there are three 
routines - FSOV, FSUN, and FSDV - which are used to set 
or change the address of the error routines. 

The error conditions and their respective flags are: 



Exponent Underflow UNFLO 

Exponent Overflow OVFLO 

Divide by DVDCK 



Location 013400 
Location 013401 
Location 013402 



If an error condition arises, the flag is set to 1 and a branch is 
made to the error routine address. If no error condition arises, 
the flag is set to 0, and a normal return from the routine 
occurs. 
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7.2.3.2.1 FSOV - FLOATING SET OVERFLOW ERROR 
BRANCH 



7.2.3.2.2 FSUN - FLOATING SET UNDERFLOW ERROR 
BRANCH 



Name: Floating Set Overflow Error Branch (FSOV) 



Name: Floating Set Underflow Error Branch (FSUN) 



Action: 

Specifies the location of the user's routine to be branched 
to in the event an operation causes exponent overflow (the 
value of the binary exponent in the result is greater than 127). 



Action: 

Specifies the location of the user's routine to be branched 
to In the event an operation causes exponent underflow (the 
value of the binary exponent in the result is less than -128). 



Calling Sequence: 

Execute CALL instruction location 04447. 
See 7.2.3.2. 



Calling Sequence: 

Execute CALL instruction to location 04452. 
See 7.2.3.4. 



Arguments: 

The D and E registers contain the address of the error 
routine. 



Arguments: 

The D and E registers contain the address of the error 
routine. 



Result: 

The location in the floating point software which specifies 
the location of the error routine is set to the address provided 
by the user in the D and E registers. 

Changes: 

The previous error routine address is destroyed. 



Result: 

The location in the floating point software which specifies 
the location of the error routine is set to the address provided 
by the user in the D and E registers. 

Changes: 

The previous error routine address is destroyed. 



Errors Recognized: 
None. 

Comments: 

In the event the user does not specify an error routine 
location, the floating point software will execute a return 
(RET instruction) rf the error condition arises, and the 
arithmetic routine called by the user will continue to 
completion. At the conclusion of that routine, the appro- 
priate error flag will be set to 1, and the result in OPER 
will, in general, be erroneous. The user's error routine 
should not end with a return since that would cause 
processing to continue in the floating point software with 
incorrect values in the machine registers. 



Comments: 

In the event the user does not specify an error routine location, 
the floating point software wilt execute a return (RET instruc- 
tion) if the error condition arises, and the arithmetic routine 
called by the user will continue to completion. At the con- 
clusion of that routine, the appropriate error flag will be set 
to 1, and the result in OPER will, in general, be erroneous. 
The user's error routine should not end with a return since 
that would cause processing to continue in the floating point 
software with incorrect values in the machine registers. 
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7.2.3.2.3 FSDV - FLOATING SET DIVIDE CHECK 
ERROR BRANCH 

Name: Floating Set Divide Check Error Branch (FSDV) 

Action: 

Specifies the location of the user's routine to be branched 
to in the event the divisor in a floating divide operation is 0. 



7.2.3.3 FLOATING COMPARE 

Name: Floating Compare (FCMP) 

Action: 

Compares, algebraically, two floating point numbers. 

Calling Sequence: 



Calling Sequence: 

Execute CALL instruction to location 04455. 
See 7.2.3.7. 

Arguments: 

The D and E registers contain the address of the error 
routine. 

Result: 

The location in the floating point software which specifies 
the location of the error routine is set to the address provided 
by the user in the D and E registers. 

Changes: 

The previous error routine address is destroyed. 



FSTL 


EQU 


04463 


Only necessary to EQU 


FCMP 


EQU 


04422 


once per program 




LA 


TLRNC 


Where TLRNC is the 




CALL 


FSTL 


comparison tolerance 
only necessary once per 
program if tolerance 
doesn't change 




HL 


NUMBER 


Number will be com- 




CALL 


FCMP 


pared with OPER 



Arguments: 

OPER contains one of the floating point numbers being 
compared, and the contents of the H and L registers address 
the other floating point number being compared. 



Errors Recognized: 
None. 

Comments: 

In the event the user does not specify an error routine 
location, the floating point software will execute a return 
(RET instruction) if the error condition arises, and the 
arithmetic routine called by the user will continue to com- 
pletion. At the conclusion of that routine, the appropriate 
error flag will be set to 1, and the result in OPER will, in 
general, be erroneous. The user's error routine may end 
with a return if the user wishes to continue execution 
immediately after the call to the routine which generated 
the error. 



Result: 

Floating Compare sets the Sign and Zero flip-flops as if 
a subtraction of the floating point number addressed by the 
contents of the H and L registers from the floating point 
number in OPER had taken place. However, if the absolute 
value of the difference is less than or equal to the tolerance 
specified (see the description of the routine FSTL for an 
explanation of how the tolerance is specified), then the Sign 
and Zero flip-flops are set as if both floating point numbers 
were found to be equal. 

Changes: 

Neither operand is altered by the Floating Compare 
operation. 



Errors Recognized: 
None. 

Comments: 

Since representations of decimal fractions in a binary 
machine are approximate, the Floating Compare operation 
allows for an "approximate" compare by allowing the user 
to specify how close two numbers may be before they are 
considered equal. 
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7.2.3.4 FLOATING ADD 

Name: Floating Add (FADD) 

Action: 

Adds two floating point numbers, rounds and normalizes 
the result. 



Calling Sequence: 



FSOV 


EQU 


04447 


FSUN 


EQU 


04452 


FADD 


EQU 


04400 




DE 


OVERR 




CALL 


FSOV 




DE 


UNERR 




CALL 


FSUN 



HL 
CALL 



NUMBER 
FADD 



Only necessary to EQU 
once per program 



Only necessary to set 
these once per program 
or until it is desired to 
change. 

Where OVERR and 
UNERR are addresses 
of user and recovery 
routines. 



Number will be added 
to OPER 



Arguments: 

OPER contains one of the floating point numbers, and 
the contents of the H and L registers address the other 
floating point number. 

Result: 

The contents of OPER and the floating point number 
addressed by the contents of the H and L registers are added 
together with the result left in OPER. 

Changes: 

The contents of OPER are altered; the floating point num- 
ber addressed by the contents of the H and L registers is un- 
changed. 

Errors Recognized: 

Exponent overflow, exponent underflow. 

Comments: 

Maximum precision is maintained by having both operands 
normalized; however, an unnormalized number may be con- 
verted to its normalized form by using this routine to add a 
"normal" to the unnormalized number. 



7.2.3.5 FLOATING SUBTRACT 

Name: Floating Subtract (FSUB) 

Action: 

Subtacts two floating point numbers, rounds and 
normalizes the result. 

Calling Sequence: 

FSUB is identical to FADD except the program must now 
contain a FSUB EQU 04403 and the last statement in 
calling sequence is: 

CALL FSUB Number will be sub- 

tracted from OPER 

Arguments: 

OPER contains the minuend and the contents of the H 
and L registers address the subtrahend. 

Result: 

The floating point number addressed by the contents of 
the H and L registers is subtracted from the floating point 
number in OPER, and the result is left in OPER. 

Changes: 

The contents of OPER are altered; the floating point 
number addressed by the contents of the H and L registers 
is unchanged. 

Errors Recognized: 

Exponent overflow, exponent underflow. 

Comments: 

Maximum precision is maintained by having both operands 
normalized; however, an unnormalized number may be con- 
verted to its normalized form by using this routine to subtract 
a "normal" from the unnormalized number. 
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7.2.3.6 FLOATING MULTIPLY 

Name: Floating Multiply (FMUL) 

Action: 

Multiplies two floating point numbers, rounds and 
normalizes the result. 



7.2.3.7 FLOATING DIVIDE 

Name: Floating Divide (FDIV) 

Action: 

Forms the quotient of two floating point numbers, rounds 
and normalizes the result. 



Calling Sequence: 

FMUL is identical to FADD except the program must 
now contain a FMUL EQU 04406 and the last statement 
in the calling sequence is: 

CALL FMUL Number will multi- 

ply OPER 

Arguments: 

OPER contains the multiplicand, and the H and L 
registers contain the address of the multiplier. 

Result: 

The floating point of OPER and the floating point num- 
ber addressed by the contents of the H and L registers are 
multiplied together with the result left in OPER. 

Changes: 

The contents of OPER are altered; the floating point 
number addressed by the contents of the H and L registers 
is unchanged. 

Errors Recognized: 

Exponent overflow, exponent underflow. 

Comments: 

This routine expects both operands to be normalized. 
If one or both of the operands is not normalized, erroneous 
results may occur. 



Calling Sequence: 

FSOV 
FSUN 
FSDV 
FDIV 



EQU 


04447 


Only necessary to 


EQU 


04452 


EQU these 


EQU 


04455 


once per 


EQU 


04411 


program 


DE 


OVERR 


Only necessary to set 


CALL 


FSOV 


these once per program 


DE 


UNERR 


or when it is desired to 
change recover routine. 


CALL 


FSUN 


Where OVERR, UNERR 


DE 


CKERR 


and CKERR are address- 


CALL 


FSDV 


es of user error recovery 
routines. 


HC 


NUMBER 




CALL 


FDIV 


Number divides OPER 



Arguments: 

OPER contains the dividend, and the H and L register con- 
tain the address of the divisor. 

Result: 

The floating point number in OPER is divided by the 
floating point number addressed by the contents of the H 
and L registers with the result left in OPER. 

Changes: 

The contents of OPER are altered; the floating point num- 
ber addressed by the contents of the H and L registers is 
unchanged. 

Errors Recognized: 

Exponent overflow, exponent underflow, divisor equal to 0. 

Comments: 

This routine expects both operands to be normalized. If one 
or both of the operands is not normalized, erroneous results 
may occur. 
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7.2.3.8 FLOATING LOAD 

Name: Floating Load (PLOD) 

Action: 

Copies a floating point number from its location in 
memory to OPER. 



Calling Sequence: 






FLOD EQU 


04414 


Only necessary to EQl 
this once per program. 


HC 


NUMBER 




CALL 


FLOD 


Number is loaded into 
OPER 



Arguments: 

The H and L registers contain the address of the floating 
point number that is to be copied into OPER. 

Result: 

The floating point number addressed by the H and L 
registers is copied into OPER. 

Changes: 

The original contents of OPER are destroyed. The float- 
ing point number addressed by the contents of the H and L 
registers is unchanged. 

Errors Recognized: 
None. 

Comments: 
None. 



7.2.3.9 FLOATING STORE 

Name: Floating Store (FSTO) 

Action: 

Copies a floating point number from OPER to memory. 



Calling Sequence: 
FSTO EQU 



04417 Only necessary to EQU 

this once per program. 



HL NUMBER 

CALL FSTO Number is loaded from 

OPER 

Arguments: 

The H and L registers contain the address of the location, 
in memory, to which the floating point number is to be copied. 

Result: 

The floating point number is copied into the location 
addressed by the contents of the H and L registers. 

Changes: 

The original contents of memory (4 bytes) addressed by 
the H and L registers are destroyed. The contents of OPER 
are unchanged. 

Errors Recognized: 
None. 

Comments: 
None. 
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7.2.3.10 FLOATING NEGATE 

Name: Floating Negate (FNEG) 

Action: 

Forms the two's complement of the floating point num- 
ber in OPER. 

Calling Sequence: 

FNEG EQU 



CALL 



04425 



FNEG 



Only necessary to EQU 
this once per program. 

OPER is negated 



Arguments: 

OPER contains the floating point number to be negated. 

Result: 

The number in OPER is converted to two's complement 
form and then this result is normalized. The final result is 
left in OPER. 

Changes: 

The original contents of OPER are destroyed. 

Errors Recognized: 

Exponent overflow, exponent underflow. 

Comments: 
None. 



7.2.3.11 FLOATING ABSOLUTE VALUE 

Name: Floating Absolute Value (FABS) 

Action: 

Forms the absolute value of a floating point number. 



Calling Sequence: 

FABS EQU 04430 

CALL FABS 



Only necessary to EQU 
this once per program 

OPER becomes the 
absolute value of OPER 



Arguments: 

OPER contains the floating point number whose absolute 
value is to be computed. 

Result: 

If the contents of OPER are greater than or equal to zero, 
then they are left unchanged. Otherwise, the contents of 
OPER are negated (see the description of FNEG). In the latter 
case, the original contents of OPER are destroyed. 

Changes: 

Contents of OPER are destroyed if they are less than zero; 
otherwise, the contents of OPER are unchanged. 

Errors Recognized: 

Exponent overflow, exponent underflow. 

Comments: 
None. 
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7.2.3.12 FLOATING FIX 

Name: Floating Fix (FFIX) 

Action: 

Converts a floating point number into a 16 bit integer. 

Calling Sequence: 

FFIX 









Calling Sequence: 




EQU 


04433 


Only necessary to EQU 










this once per program 


FFLT EQU 


04436 


HL 


NUMBER 


Number and number+1 






CALL 


FFIX 


will contain the 16 bit 


HL 


NUMBER 






integer made from 


CALL 


FFIX 



OPER 

Arguments: 

OPER contains the floating point number to be fixed 
(converted to an integer), and the H and L registers con- 
tain the address, in memory, of the high order byte (upper 
eight bits of the integer) where the integer is to be placed. 

Result: 

The floating point number is converted to a 16 bit integer. 
If the number has a fractional part, that part is lost. The 16 
bit integer is stored in memory beginning at the byte address- 
ed by the contents of the H and L registers. 

Changes: 

The original contents of the 16 bits addressed by the con- 
tents of the H and L registers are destroyed. The contents 
of OPER are unchanged. 

Errors Recognized: 
None. 

Comments: 

If the number in OPER is such that it cannot be repre- 
sented in 16 bits, only the low order 16 bits are stored in 
memory. Any higher order bits are lost. 



7.2.3.13 FLOAT 

Name: Float (FFLT) 

Action: 

Converts a 16 bit integer into a normalized floating point 
number. 



Only necessary to EQU 
this once per program 

The 16 bit integer in 
number and number-i-1 
will be converted to 
floating point in OPER 



Arguments: 

The H and L registers contain the address, in memory, of 
the high order byte (high order eight bits) of the 16 bit 
integer that is to be converted. 

Results: 

The 16 bit integer is converted from its integer form to the 
floating point form, and the result is normalized and left in 
OPER. 

Changes: 

The original contents of OPER are destroyed. The 16 bit 
integer addressed by the H and L registers is unchanged. 

Errors Recognized: 
None. 

Comments: 
None. 
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7.2.3.14 FLOATING SET COMPARE TOLERANCE 

Name: Floating Set Compare Tolerance (FSTL) 

Action: 

Specifies a range in which the difference of two floating 
point numbers must lie for the two numbers to be considered 
equal. 

Calling Sequence: 
See 7.2.3.3. 

Arguments: 

The A register contains the tolerance as a positive eight 
bit integer (the high order bit of the A register must be 0). 

Result: 

The location in the floating point software which speci- 
fies the floating point compare tolerance is set to reflect the 
value provided by the user in the A register. 

Changes: 

The previous value of the tolerance is destroyed. 

Errors Recognized: 
None. 

Comments: 

When the floating point package is initialized, the tolerance 
is set as if the user had called FSTL with a 2 in the A register. 
If the value in the A register is less than .0 when FSTL is 
called, erroneous results may occur when using the floating 
compare routine, FCMP. 
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SECTION 8 

DAT APOINT 2200 
COMMUNICATIONS SUBROUTINES 



SECTION 8 



1. IIMTRODUCTIOIM 

Interfacing the Datapoint 2200 with a wide range of commu- 
nication facilities is a simple task. All that is needed is the 
2210 ACA Communications Adaptor with the required data 
set or keyer option and the necessary software subroutines to 
drive it. The software subroutines may or may not have been 
vyritten for a particular application. However, it seems likely 
that most users will choose to develop their own to fit their 
particular needs. This chapter is devoted to aiding the user 
in fulfilling this goal. 

Understanding communications subroutines is useful for 
many reasons. It enables use of communication disciplines 
not previously used to fill a specialized need. It enables a 
user to develop routines that are most efficient for his parti- 
cular application, it permits a user to modify previously 
written routines for special purposes and provides greater 
insight into how the communications system functions. 

There is nothing difficult about the communications routines. 
They are just another part of the user's applications '.lOgram. 
The routines are given special treatment here because they 
are used so frequently and because the terminology and 
hardware used for communication is foreign to many users. 



which permits many separate I/O routines to be "scanned" 
during normal execution of a program so that several I/O 
or other subroutines can be active at the same time. 

This leads to the two possible types of communications 
subroutines: "in-line" and "interleaved". In-line subroutines 
are those routines which are written in such a way that 
whenever they are called they "capture" the processor 
until their function is complete and hence do not permit 
any other subroutine to be active at the same time. In many 
situations in-line subroutines are all that is required (such as 
during an automatic dialing operations when the 2200 has 
no other functions to perform). Interleaved subroutines 
are written in such a way that they return to the calling 
routine at regular intervals while they are active - to be 
called again to complete their work. Return points in 
communications subroutines frequently occur following 
status checks of external devices so that the communications 
subroutine does not sit in a "tight-loop" waiting for some 
external operation to be completed. 

All of the I/O routines in the CTOS (Operating System) are 
in-line and would not be used during interleaved operations. 

3. INPUT/OUTPUT OPERATIONS 



In addition to the material covered in this chapter the user 
should be familiar with material covered in other publica- 
tions on the subject of data communications. Two references 
that are highly recommended before embarking on any 
communications oriented 2200 applications are: 

Bell System Data Communications Technical Reference 

Manual* 
Martin, James; Teleprocessing Network Organization; 

Prentice- Hall, 1970 

2. TYPES OF SUBROUTINES 

As in most modern computers, the input/output devices 
used with the Datapoint 2200 are much slower than the 
2200 processor. In order for an input/output (I/O) routine 
to be efficient it must be possible for the processor to 
perform other tasks (including other I/O operations) while 
a given I/O routine is active. One approach is to use an 
interrupt system in the processor to stop one routine and 
give control to another when an I/O operation is needed. 
The Datapoint 2200 does not have an interrupt system but 
in its place it has a very powerful subroutine calling mechanism 



In order to write any type of I/O subroutine for the Data- 
point 2200 it is necessary to have a working knowledge of 
the input/output section of the processor. All 2200 I/O 
devices (including the CRT, keyboard and tape cassette 
decks as well as the Communications Adaptor) operate 
alike and have the same general I/O structure. 

The basic physical details of the I/O structure are given in 
Part 4 of the Datapoint 2200 Reference Manual. We will 
deal with this system here from a programmer's point of 
view. 

3.1 Data Buses 

Data flow to and from the processor takes place over a 
set of I/O data lines connected to the A-register in the 
processor. Output data is transmitted from the A-register 
by eight wires which at all times reflect the contents of 
the A-register. Whenever the content of the A-register is 
to be transmitted to an I/O device, one of the external 
command instructions is executed, which causes one of 
the External Command Strobes to pulse a signal to the 
I/O device, informing it that the data on the output bus 
is for it, and should be read. 



*Obtained through Engineering Director— Data Communications, American Telephone and Telegraph Co., 
195 Broadway, N.Y., N.Y. 10007 
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3.2 



Input data is transmitted to the A-register in the pro- 
cessor by eight wires which form a bus connected to 
all I/O devices. Each I/O device is so arranged that 
only the one currently addressed will have access to 
this bus. Normally, when an I/O device is first 
addressed, a status word is placed on this bus. The 
status word (or whatever is placed on the bus) is 
loaded into the A-register whenever an INPUT 
instruction is executed. 

External Command Strobes 

The Datapoint 2200 processor has 24 External Com- 
mand Strobes in its I/O structure, only eight of 
which are brought to devices outside of the 2200 pro- 
per (e.g. the Communications Adaptor) and need be 
considered here. 



ADR 


EQU 


1 


STATUS 


EQU 


2 


DATA 


EQU 


3 


WRITE 


EQU 


4 


C0M1 


EQU 


5 


COM2 


EQU 


6 


COM3 


EQU 


7 


COM4 


EQU 


8 



(In all examples following in this chapter it is assumed that 
all External Command labels have been defined.) 

When an External Command is executed, physically all that 
occurs in the processor is a pulse (or strobe) on the indicated 
command line. All other action occurs in one of the I/O 
devices. 



These eight command lines are physically identical, 
and their functions are pre-assigned in the table 
below for the sake of consistancy between I/O 
devices. 



a. EX ADR is the only command strobe acted upon 
by all I/O devices at the same time. All other command 
strobes affect only the I/O device that is currently addressed. 



EXTERNAL COMMAND 



COMMAND 




OCTAL 




NUMBER 


(exp) 


CODE 


COMMAND 


1 


ADR 


121 


Address 


2 


STATUS 


123 


Sense Status 


3 


DATA 


125 


Sense Data 


4 


WRITE 


127 


Write Strobe 


5 


C0M1 


131 


Command 1 


6 


COM2 


133 


Command 2 


7 


COM3 


135 


Command 3 


8 


COM4 


137 


Command 4 



DESCRIPTION 



Selects device specified by A-register 

Connects selected device data lines to data 

input bus 

Connects selected device data lines to data 

input bus 

Signals selected device that output data is on 

data output lines 

Signals selected device that a control word is on 

data output lines 

Signals selected device that a control word is on 

data output lines 

Signals selected device that a control word is on 

data output lines 

Signals selected device that a control word is on 

data output lines 



When external commands are to be used in a program the 
names or labels for the commands used should be defined 
to the assembler at the beginning of the source code listing 
as in the following example: 



b. EX STATUS causes the selected device to place its 
status word on the input bus (it may already be on the bus 
in which case the EX STATUS does nothing). 



8-2 



c. EX DATA causes the selected device to place its 
data word on the input bus. This data will remain there 
until an EX STATUS or an EX ADR is executed. 

d. EX WRITE- The write strobe command is a 
signal from the processor that data is present on the data 
output lines for the selected external device. 

e. EX C0M1 thru EX COM4 are used generally to 
load command words into I/O device command word 
registers. Depending on the device, however, they may 
be used for any purpose. 

Device addressing in the Datapoint 2200 follows an unusual 
convention which the programmer should be aware. Up to 
16 devices may be addressed, and the first four (low order) 
bits of the address word indicate which address is selected 
(zero through fifteen). The second four (high order) bits of 
the address word must contain the binary complement of 
the first four bits. Some of the sixteen possible addresses 
are reserved for specific devices. The remaining ones may 
be assigned as needed for a particular application. 

DEVICE ADDRESS ASSIGNEMENTS 



DEVICE 


NUMBER 


BINARY 


OCTAL 


Cassette Tape 





11110000 


360 


Decks 








CRT/Keyboard 


1 


11100001 


341 


Communica- 


2 


11010010 


322 


tions Adaptor 








2200P Printer 


3 


11000011 


303 


2200T Tape 


4 


10110100 


264 


Transport 








Unassigned 


5 


10100101 


245 




' 


6 


10010110 


226 




' 


7 


10000111 


207 




' 


8 


01111000 


170 




' 


9 


01101001 


151 




' 


10 


01011010 


132 




' 


11 


01001011 


113 




' 


12 


00111100 


074 




' 


13 


00101101 


055 




' 


14 


00011110 


036 




15 


00001111 


017 



LA 
EX 



0322 
ADR 



3.3 The Input Command 

In order to load the A-register with whatever is on the 
input bus an INPUT instruction is executed. In addi- 
tion to loading the A-register with a new value, it 
transmits a strobe to the selected external device to 
inform it that the input bus has been read. Generally, 
if the status word is on the input bus, the input 
strobe is of no interest to the I/O device. However, if 
the data word from the I/O device is on the input bus, 
then the input strobe informs the I/O device that it 
has been read by the processor and the device then 
clears the read ready status bit. 

3.4 Command Words 

Through the use of the EX C0M1 through EX COM4 
strobes, it is possible to load command words in an I/O 
device, which causes the device to carry out specific 
instructions, or to assume some specific configuration. 
An excellent example of a command word structure 
is shown in paragraph 8.5 of the Datapoint 2200 Refer- 
ence Manual. Each bit of the command word affects 
some aspect of the Communications Adaptor configura- 
tion and the entire operating mode of the adaptor is 
determined by the content of the Command Word 
Register at any given time. 

When an EX COMn is executed, all of the bits in the 
affected command word register are loaded from the 
A-register so care must be taken that all eight bits are 
accounted for whenever a change is made in a command 
word register. Generally, when a word is loaded into a 
command word register, it remains there until another 
one replaces it. In some devices, (not the Communica- 
tions Adaptor) a bit set to one will return to zero 
automatically when some function is carried out. 

To give an example; suppose it was desired to instruct 
the Communications Adaptor to go "off-hook" and 
to "send 2025 Hz". The device would be addressed: 



LA 
EX 



By way of example, to address (or select) the Communica- 
tions Adaptor (and de-address all other devices) the following 
instructions are all that is required: 



0322 
ADR 



and then a command word loaded 
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LA 
EX 



060 
C0M1 



4. SIMPLE COMMUNICATIONS ADAPTOR 
ROUTINES 



Where 060 is the octal value of the command word. 

3.5 The Status Words 

The status word provides a means of communicating 
to the processor the state of an I/O device at any 
given time. The status word Is placed on the Input bus 
whenever an I/O device is addressed, and remains there 
until the device is de-addressed or an EX DATA Is 
executed. If the status of the device changes while it 
Is selected, the value on the Input bus changes with it, 
and may be read Into the A-reglster without re-address- 
ing the device. Paragraph 8.2 of the 2200 Reference 
Manual provides a detailed example of the status word 
structure used in the Communications Adaptor. 

If it were desired to jump to a subroutine If the "Ring- 
ing Present" bit of this status word were to come true 
it could be coded as follows: 



In writing any routine for the Communications Adaptor 
some simple rules must be followed. Reference should be 
made to Section 8 of the Datapoint 2200 Programmer's 
IVIanual in order to understand the following discussion. 

Whenever data is to be transmitted or received through the 
Communications Adaptor, the device must first be configured 
for the mode of operation to be used. This is generally done 
with a prep subroutine which sets the Communications 
Adaptor Command Word (EX C0M1). The transmit and 
receive time base registers (EX COM3 and EX COM2) and 
the Character Length Mask Word (EX COM4). 

4.1 External Printers 

Suppose It Is desired to drive an external printer 
such as the Datapoint 3300P from the Communications 
Adaptor (The Datapoint 2200P connects directly to 
the I/O bus and does not use the Communications 
Adaptor). The 3300P Is an EIA RS-232 Interface 
serial printer, operates at 300 baud (bits/second) 



LA 


0322 


EX 


ADR 


INPUT 




ND 


040 


JFZ 


SUBR 



ADDRESS DEVICE 

INPUT STATUS WORD 

MASK OFF ALL OTHER BITS 

JUMP TO SUBROUTINE I F A CONTAINS A ONE 



3.6 Character Buffers 

An I/O device generally has one or more registers or 
buffers used to hold characters (also called "data") 
which are being transmitted or received by the device. 
Slow devices such as the keyboard usually have only 
one character buffer since the processor has plenty 
of time to read a character from the buffer before 
another Is loaded. 

Faster devices such as the Communications Adaptor 
have a double character buffer for transmitting or 
receiving data so that the processor may be reading 
(or writing) from one buffer while a data set (or some 
other external equipment) Is writing (or reading) to 
the other buffer. This means that the processor always 
has at least one full character time in which to service 
the Communications Adaptor between data transfers. 

Some even faster devices (such as the 2200T IBM 
Compatible Tape Deck) buffer an entire string of 
characters (up to 1024 in this example). 



uses an 8-informatlon-blt code, and works best with 
two stop units. 

Referring to paragraph 8.5 of the Reference Manual 
we see that the Command Word can be all zeros. (No 
data set is involved and neither transmit or received 
data is Inverted). 

Referring to paragraph 8.6 we see that to transmit 
300 baud the transmit time base must be loaded with 
377 followed by 000. The receive time base need not 
be set since we are only transmitting to a printer. 

Referring to paragraph 8.7 we see that the transmitted 
character length mask must be 001 (binary) and the 
receive character length can be 000 (binary) since we 
are not going to receive anything. Bit 6 must be 1 since 
we are using the EIA-RS-232 output. The binary value 
of this word then Is 01000001 (binary) or 101 (octal). 

The following subroutine will therefore configure the 
Communications Adaptor for the 3300P printer: 
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PREP1 



LA 


0322 




EX 


ADR 


ADDRESS DEVICE 


LA 







EX 


C0M1 


SET COMMAND WORD 


LA 


0377 




EX 


COM 3 


SET TRANSMIT TIME BASE 


LA 







EX 


COM3 




LA 


0101 




EX 


COM4 


SET CHARACTER LENGTH 


RET 







This routine need only be executed once at the start 
of the use of the printer. 

Once the Communications Adaptor is configured a 
subroutine must be called to transmit data to the 
printer. An in-line subroutine could lool< like this: 



PRINT1 


HL 


MSG 


LOOP 


LA 


0322 




EX 


ADR 




INPUT 






ND 


1 




JTZ 


LOOP 




LAM 






EX 


WRITE 




CP 


015 




RTZ 






CALL 


INCHL 




JMP 


LOOP 



LOAD H AND L WITH BUFFER ADDRESS OF MESSAGE TO BE TRANSMITTED 



ADDRESS DEVICE 

MASK FOR TRANSMIT READY 

LOOP BACK IF NOT READY 

LOAD A FROM MEMORY IF READY 

TRANSMIT TO COMMUNICATIONS ADAPTOR 

COMPARE WITH END OF MESSAGE CHARACTER 

RETURN IF END OF MESSAGE 

INCREMENT HAND L 

LOOP BACK IF NOT END OF MESSAGE 



The above example assumes that a message has been 
stored in a buffer area in memory and is transmitted 
to the printer to the exclusion of all other activity. 

A more general routine might be to transmit a single 
character to the printer and the return to the calling 
program for other activity while the printer is printing. 
An example of this might be as follows: 



PRINT 



LA 


0322 


EX 


ADR 


INPUT 




ND 


1 


RTZ 




LAB 




EX 


WRITE 


OR 


1 


RET 





ADDRESS DEVICE 

MASK FOR TRANSMIT READY 

RETURN TO CALLING PROGRAM WITH A ZERO IN A REGISTER IF PRINTER 

NOT READY 

IF PRINTER READY, LOAD A FROM B WITH CHARACTER TO BE PRINTED 

MAKE SURE Z-FLAG IS SET TO 
RETURN TO CALLING PROGRAM 



"See end of chapter for frequently used utility routines 
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Before calling this subroutine, B is loaded with the 
character to be printed and when the subroutine 
returns the Z-flag can be tested to see if the printer 
accepted the character. 

4.2 Non-Automatic Data Sets 

Data sets that are not autonnatically controlled from 
the software such as acoustic couplers or external 
data sets using private line connections are generally 
the easiest to program and vyill be used as our first 
examples of programming for data sets. 

For an example, let us program a Datapoint 2200 to 
interface with an acoustic coupler which will be used 
to call a time-sharing service and operate full-duplex at 
1 1 baud. (This program will make the 2200 look like 
a typical KSR teletype machine). The main program 
might be written like this: 



START1 


CALL 


PREP2 




LA 


012 




CALL 


DISPLY 


SCAN1 


CALL 


READ1 




JTZ 


SCAN 2 


HDX 


CALL 


DISPLY 


SCAN2 


CALL 


KEYIN 




JTZ 


SCAN1 




CALL 


WRITE1 



CONFIGURE COMM ADAPTOR 
(LINE FEED) 

CLEAR BOTTOM LINE OF CRT 

INPUTS CHAR FROM COMM 

ADAPTOR IF ONE READY 

GOTO KYBD CHECK 

WRITE CHAR IN A-REG TO CRT 

INPUTS CHAR FROM KYBD 

IF ONE READY 

CHECK COMM ADAPTOR 

OUTPUT KYBD CHAR TO 

COMM ADAPTOR 



JMP 



SCAN1 



This is all there needs to be to the main program. When 
starting, a prep subroutine is called to configure the 
Communications Adaptor. A scanning loop is then 
entered which looks for characters from the Communi- 
cations Adaptor or the keyboard and transmits them 
to their respective destinations. 

If it were desired to operate the program in a half- 
duplex mode where the characters are displayed direct- 
ly on the CRT rather than full-duplex where the 
characters are transmitted back from the remote com- 
puter then the last instruction in the main program 
should be JMP HDX rather than JMP SCANT 

In this particular mode of operation the Command 
Word would have bits and 4 set to one and all 
others set to zero (Paragraph 8.5, 2200 Reference 
Manual). The time base mask words would be 375 and 
106 for both transmit and receive, and the Character 
Length Mask word would be 1 1 1 (octal). (Bit 6 is set 
to one since the acoustic coupler is an external data 
set and uses the EIA-RS-232 interface.) 
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The PREP2 subroutines would therefore be coded as 
follows: 

PREP2 



LA 


0322 


EX 


ADR 


LA 


021 


EX 


C0M1 


LA 


0375 


EX 


COM2 


EX 


COM3 


LA 


0106 


EX 


C0IV12 


EX 


COM3 


LA 


0111 


EX 


COM4 


RET 





ADDRESS DEVICE 
OUTPUT COMMAND WORD 

SET TRANSMIT AND RECEIVE 
TIME BASES TO 110 BAUD 



SET CHAR LENGTH MASK 



TO 11-UNITCODE 



To input characters from the Communications Adaptor 
a subroutine READ1 is written. It will test the Commu- 
nications Adaptor to see if a character is ready, and if 
so, read it. If no character is found the Z-flag is re- 
turned set to 1 and if a character is read it is returned 
set to zero. The code is as follows: 



READ1 



LA 


0322 


EX 


ADR 


IN 




ND 


2 


RTZ 




EX 


DATA 


IN 




ORA 




RET 





ADDRESS DEVICE 
CHECK READ READY AND 
RETURN IF NOT READY 

PUT DATA ON INPUT BUS 
TRANSFER CHAR TO A-REG 
SET Z-FLAG IF CHAR = 



To output characters to the Communications Adaptor 
a subroutine WRITE 1 is written. It will accept a 
character in the A-register, transmit it to the Commu- 
nications Adaptor, and return to the main program 
when the task is finished with the character remaining 
in the A-register. It is coded as follows: 



WRITE1 



RETRY 



LBA 

LA 

EX 

IN 

ND 

JTZ 

LAB 

EX 

RET 



SAVE A IN B 

0322 

ADR ADDRESS DEVICE 

TEST FOR TRANSMIT READY 
1 AND RETRY IF BUSY 

RETRY 



WRITE 



SEND CHAR OUT 



The subroutines DISPLY and KEYIN are shown at the 
end of this chapter for information purposes. Since 
they do not involve the Communications Adaptor they 
will not be discussed here. 
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4.3 The High Level Keyer 

When the high level keyer is used it operates in every 
respect like an external data set except that the Com- 
mand Word is set to all zeros. Bit 6 of the Character 
Length Mask is set to one. 

5. AUTOMATIC DATA SET OPERATION 

One of the major features of the Datapoint 2200 is its ability 
to operate with the telephone network, providing completely 
automatic call origination and answering. 



NUMBER DC '9*51 25551 234',01 5 

would cause 9 to be dialed, then a pause, then 512-555-1234 
to be dialed then control transferred to the calling program. 

All other characters in the buffer area are ignored. 



5.1 Automatic DDD Network Call Origination. 

Automatic Call origination requires the Communica- 
tions Adaptor to be provided with either a 103 or 
202 internal data set option. These data sets inter- 
face with the telephone network through a Bell 
System Direct Access Arrangment (DAA). (See the 
Datapoint 2200 Installation Manual for specific 
details). 

To automatically originate a call the following events 
must occur: 

a. The DAA must have been on-hook long enough 
to assure complete termination of any previous call. 

b. The Communications Adaptor must be configured 
for an automatic dialing mode. 

c. The DAA must be set "Off-hook" and the dial 
tone present bit tested for ready (one). 

d. The desired number transmitted. 

e. The Communications Adaptor configured for 
the type of data set used and the connection confirmed 
(answered by another data set). (If the call is not confirmed 
within a reasonable time, usually about 30 seconds, a retry 
is probably indicated about 3 to 5 times). 

f. Normal data transmission occurs. 

g. The DAA is set to "on-hook" as soon as the con- 
nection is no longer desired. 



The following code (page 8-9) provides an example of a com- 
plete automatic call origination sequence up to the point of 
reconfiguring the Communications Adaptor for the particular 
data set used (Step e. above). The number to be dialed is 
assumed to have been previously stored in an ASCII charac- 
ter sequence in a buffer area in memory beginning at NUM- 
BER. An ASCII '*' (052) between digits results in an extra 
delay between dial pulses when such might be required to 
obtain an outside line in a private exchange or for some 
other reason. The end of the number is indicated by an 
ASCII return (015). For example: 
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DIAL 



DTONE 



NEXDIG 
LDIG 



CMPR 



MASK 



PLOOP 



HL 

LA 

EX 

SUA 

EX 

DE 

CALL 

LA 

EX 

LA 

EX 

LA 

EX 

EX 

IN 

ND 

JTZ 

JMP 

CALL 

LAM 

CP 

JFZ 

DE 

CALL 

JMP 

CP 

RTZ 

CP 

JFS 

CP 

JTS 

JFZ 

LA 

ND 

LBA 

IN 

ND 

JTZ 

LA 

EX 

LAB 

SU 

LBA 

DE 

JFZ 

CALL 

JMP 



PHNUMB 

0322 

ADR 

C0M1 

10000 

DELAY 

0330 

C0M1 

0375 

COM3 



COM3 

COM4 

0200 
DTONE 
LDIG 
INCHL 



CMPR 

10000 

DELAY 

NEXDIG 

015 

'9'+1 

ERR1 

'0' 

ERR1 

MASK 

10 

017 



1 

PLOOP 
0360 
WRITE 

1 

2000 
PLOOP 
DELAY* 
NEXDIG 



BUFFER POINTER 

ADDRESS DEVICE 

SETDAAON-HOOK 

DELAY 5 SECONDS 

CONFIGURE FOR DIALING; OFF HOOK, 
INVERT DATA, SEND DIAL PULSES. 
SET 100 BAUD (10 CPS) DIAL RATE 



WAIT FOR DIAL TONE 



GET FIRST DIGIT 
INCREMENT HAND L 

IF THE A-REG CONTAINS '*' THEN 
CALL 5 SECOND DELAY 



RETURN IF END OF NUMBER 
TEST FOR VALID DIGIT 



CHANGE ZERO TO TEN 
MASK-OFF HIGH ORDER BITS 
SAVE A IN B 
WAIT FOR TRANSMIT READY 



SEND DIAL PULSE 
DECREMENT PULSE COUNTER 



DELAY ONE SECOND 



Upon returning from the DIAL subroutine the Communica- 
tions Adaptor should be reconfigured for the type of data 
set used and the status bit tested for main channel carrier 
present. If it is not received within 30 seconds the call 
should be terminated and retried. The following code shows 
how this could be done for a 103 type data set operating at 
1 50 baud. 



*See end of chapter for frequently used utility routines 
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CNFIRM LA 


0322 


EX 


ADR 


LA 


0121 


EX 


COMI 


LA 


0376 


EX 


COM2 


EX 


COM3 


LA 





EX 


COM2 


EX 


COM3 


DE 


60000 


MCCDET INPUT 




ND 


0100 


RFZ 




LAE 




SU 


1 


LEA 




LAD 




SB 





LDA 




JFZ 


MCCDET 


RET 





RE-CONFIGURE COMMUNICATIONS ADAPTOR 



SET TIME COUNTER 

RETURN IF MAIN CHANNEL CARRIER PRESENT 

DECREMENT TIME COUNTER 



RETURN IF TIME OUT 



This subroutine returns with the Z-f lag O if the 
carrier has been detected and 1 if it has not after 
30 seconds. 

The first part of a main program using these routines 
might be coded as follows: 



START 


LC 


5 


RSTART 


LAC 






SU 


1 




LCA 






JTZ 


QUIT 




CALL 


DIAL 




CALL 


CONFIRM 




JTZ 


RSTART 



SET NUMBER OF CALL TRIES 
DECREMENT CALL COUNTER 
EXIT AFTER 5TRIES 



REMAINDER OF MAIN PROGRAM 



NUMBER DC 



'9*51 25551 234',01 5 



5.2 Automatic DDD Networl< Call Answering. 

Answering a call from the DDD networl< is very sim- 
ple and we will not repeat coding examples for this 
function. The procedure is as follows: 

a. Make sure the Command Word bit 4 is zero, main- 
taining the DAA "on-hook". 

b. At regular intervals test bit 5 of the Status Word 
for ringing present. 
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c. If ringing is detected configure the Communica- 
tions Adaptor for the type of data set used and set Com- 
mand Word bit 5 for off-hook (1). 

d. Depending on the type of data set, test for a re- 
ceived carrier (main channel in a type 103, main or super- 
visory channel depending on initial direction of communi- 
cations in a 202 type). If no carrier is received after 30 
seconds return to step a. above). If normal carrier is 
received then continue with normal communications. 

6. FREQUENTLY USED SUBROUTINES 

6.1 INCHL 

This subroutine is used to increment the value stored 
in the H and L register as a double precision (16-bit) 
number. 

INCHL LAL 

AD 1 

LLA 
LA LAH 

AC 

LHA 

RET 

6.2 DELAY 

This subroutine provides a means for a time delay up 
to 30 seconds. Before calling the routine a double 
precision number is loaded into the D and E registers 
using the DE macro. This number is decremented at 
a rate of 2000 counts per second until D and E are 
zero and then the subroutine returns to the calling 
program. 

DELAY LAE 

SU 1 

LEA 

LAD 

SB 

LDA 

JFZ DELAY 

ADE 

RTZ 

JMP DELAY 

6.3 DISPLY 

This routine accepts a character in the A-register and 
displays it on the CRT screen at the current cursor 
position and then increments the cursor to the next 
position. Characters are always entered on the bottom 
line of the screen and the screen is rolled up one line 
whenever an ASCII line-feed is received (012). The 
character displayed is in the A-register when the 
routine returns. 
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DISPLY 


LBA 




SAVE A IN B 




LA 


0341 


ADDRESS DEVICE 




EX 


ADR 






LAB 




LOAD A FROM BAND 




ND 


0177 


MASK PARITY BIT 




CP 


015 


TEST FOR CR 




JTZ 


CRDET 






CP 


012 


TEST FOR LF 




JTZ 


LFDET 






CP 


040 


TEST FOR VALID 




RTS 




ASCII CHARACTER 




CP 


0177 


(RUBOUT) 




RTZ 








EX 


WRITE 






HL 


CURPOS 


INCREMENT CURSOR POS 




LAM 








AD 


1 






CP 


80 






JFS 


OFDET 






LMA 




SAVE CURSOR POS 




LCA 




SAVE A IN C 


WCOMP 


IN 




TEST FOR WRITE DONE 




ND 


1 






JTZ 


WCOMP 






HL 


CMDWRD 


GET COMMAND WORD 




LAM 








EX 


C0M1 






LA 


020 






LMA 




RESTORE COMMAND WOF 




LAC 








EX 


COM2 


WRITE NEW CURSOR POS 




LA 


11 


MAINTAIN CURSOR ON 




EX 


COM3 


BOTTOM LINE 




LAB 




RESTORE CHAR TO A 




RET 






LFDET 


HL 


CMDWRD 






LA 


030 


SET NEW 




LMA 




COMMAND WORD 




HL 


CURPOS 






LCM 




LOAD CURSOR POS 




JMP 


WCOMP 




LFDET 


HL 


CMDWRD 






LA 


030 


SET NEW 




LMA 


030 


COMMAND WORD 




LC 









HL 


CURPOS 


SET NEW CURSOR 




LMC 




POSITION AND STORE 




JMP 


WCOMP 




CURPOS 


DC 







CMDWRD 


DC 


020 




CRDET 


EQU 


LFDET 
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6.4 KEYIN 

This subroutine is used to scan the keyboard and if a 
character is present return it to the calling program 
in the A-register. If the keyboard switch is held down 
during a keyboard entry, bit six of the data word is 
set to allowing upper case ASCII characters to be 
converted to ASCII control characters (e.g., upper case 
J is converted to ASCII line-feed). The subroutines exits 
with the Z-flag set to one if no character is input and 
set to zero if a character is present. 



KEYIN 



CCONT 



LA 


0341 


EX 


ADR 


IN 




LBA 




ND 


2 


RTZ 




LAB 




ND 


4 


EX 


DATA 


IN 




JFZ 


CCON" 


ORA 




RET 




ND 


077 


RET 





ADDRESS DEVICE 

INPUT STATUS 
SAVE STATUS IN B 

RETURN IF READ NOT READY 

RESTORE STATUS 

MASK FOR KYBD SENSE SW 

READ DATA FROM KYBD 
JUMP IF KYBD SW SET 
RESET Z-FLAG 

MASK BIT 6 
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SECTION 9 



DATAPOINT2200 



OPERATING SYSTEM LISTING 



Pf¥3E 



££00 CPERhiTim SYSTEM - 0£.-05.'71 



LOADER 



H.S.P, 



. PARITV CHECH. THE BCOTSIRAPED DATA 



00000 


f,?F^. 


050 056 000 


CKLQAD; 


HL 


PSTART 


00e®4 


036 


.000 




LD 


$-$ 


00006 


046 


000 




LE 


$-$ 


exs0i0 


307 




CKLOCP: 


LAM 




0001-1 


:3£0 






LCA 




0001-2 


£53 






xRD 




0001- J 


330 






LDA 




00014 


■:wp 






LAC: 




00015 


254 






XftE 




00016 


012 






SRC 




00017 


340 






LEA 




000£0 


:306 






LAL 




000£1 


004 


001 


HALT: 


AD 


1 


000S3 


3fci0 






/ i A 




000£4 


305 






LAH 




00(,7«='S 


014 


000 




AC 





0a2i27 


350 






LHA 




00030 


074 


002 




CP 


PEND>8 


0003£ 


110 


010 000 




JFZ 


CKLOOP 


00035 


306 






LAL 




00036. 


074 


000 




CP 


PEND 


00040 


110 


010 000 




JFZ 


CHLC€P 


00043 


:303 






LAD 




00044 


264 






ORE 




00045 


110 


0i>-P' 000 




JFZ 


HPLT+1 


00050 


0fiF. 


054 056 000 


PSTART; 


HL 


SCLCCP 


00054 


306 




SCLOCP; 


LAL 




00055 


024 


001 




SU 


1 


00057 


360 






i i A 




0*2060 


373 






LMD 




000C-1 


110 


054 000 




JFZ 


SCLCCP 



INITIALIZE xOR CHECK 

INITIALIZE CIRCLE CHECK 

(3ET A BVTE 

SAVE IT 

ACCUMULATE THE xOR PARITV 



ACajHLtATE THE CIRCLE PARITV 
INCREMENT HL 



000EM 


016 000 


BCOT^i*:- 


LB 





00066 


106 100 000 




CALL 


LOAD* 


00071 


100 to/b 000 




^FC 


RL-N* 


00074 


377 




H^T 




00075 


104 064 000 


Ra~J«ii- 


JMP 


SCOT* 



STOP WHEN PAST END 



ChECK THE PARITV AC;CUMULATIONS 



CLEAR LOW CORE TO HAlT SHORT LOADS 
DEC.RE^ENT ^C:^iORV POINTER 



CLEAR ThE LOCATION 

L^ L^/TIL LCCATION ZERO CLEAR 



bcc'tstrap lcads the zerc'th fii_e 

load file zero 

Execute if load was ckav 

overstcred with starting address 

££00' BINARY IMA3E FILE LOADER 

LPLN ENTRY THE B REGISTER SHOULD CONTAIN 

THE DESIRED FILE ^JLMBER iPOSITIVEi 

FILL LABEL RECORD_FQRMAT: 0201/0176-' Nx-N 

DATA REuCfi:D FORMA i : 0303/074- xP/CPxHxL/-Hx'-L/DATA. . . 

THE 0303/074 INDICATES NMERIC TYPE DATA 

H A^JD L LEFINE ThE STARTING ADDRESS 

xp IS IHL XUK PARITV AND CP IS ThiE CIRCULAR PARITV 

FOR THE CHARACTERS FOLLOi-JING THE CP 



00100 00b 360 



LCAiJ** LA 



fe>l360 



ADDRESS ThE CASSETTE .^CCHANISM 



PAGE 



2200 CPERATING SYSTEM - 02/05/71 - LCWOER 



H.S.P. 



00102: 


121 






Ex 


ACR 


00ieB 


106 322 


001 




CAI ( 


STOP 


00106 


155 






Ex 


DECKl 


00107 


104 121 


000 




J^F' 


LCAD 


00112 


006 360 




t-c»^ce«;i 


:- t-A 


0360 


00114 


121 






Ex 


ADR 


00115 


106 322 


001 




CALL 


STCP 


001S0 


157 






Ex 


DECKS 


00121 


106 323 


001 


LOAD; 


CALL 


DHAIT 


00124 


301 






LAB 




001 i^S 


£60 






QRA 




001£e 


160 270 


001 




JTS 


ARGH 


00131 


PiP^ 077 056 000 




H- 


RUN*+2 


00135 


250 






xRA 




00136 


370 






Lm 




£Kil37 


104 012 


001 




Jh-P 


FSTART 








. SEmCH FOR 


ThE ECS. 


00142 


106 :360 


001 


rmiT: 


CALL 


GETCH 


00145 


100 142 


000 




JFC 


Fi-mj 


00150 


106 350 


001 


FNExT; 


CA( 1 


RTINIT 


00153 


0>-6 00P. 




FREm: 


LC 


e 


00155 


106 325 


001 




CAl/ 


TWAIT 


00160 


044 00^ 






fN(D 


P 


00162 


110 270 


001 




JFZ 


ARiGH 


00165 


106 360 


001 




CALL 


GETCH 


00170 


330 






LEW 




00171 


106 360 


001 




CALL 


GETCH 


00174 


054 377 






xR 


0377 


00176 


273 






CPD 




00177 


110 244 


000 




JFZ 


FSTCP 


00202 


■ 074 303 






DP 


0303 


i2E/204 


150 142 


000 




JT2 


FW^IT 


00207 


074 347 






CP 


0347 


00211 


150 142 


000 




JTZ 


rWAIT 


00214 


074 201 






CP 


0201 


00216 


110 244 


000 




'JFZ 


FSTCP 


00221 


106 C^=i~, 


001 




Cfi 1 


CCTCH 


00224 


3:30 






LDA 




00225 


106 ■:=iWi 


001 




CALL 


GETCH 


00230 


054 377 






XR 


0377 


00232 


273 






CPD 




00233 


110 244 


000 




^rz 


FSTCP 


00236 


106 360 


001 




CALL 


C^TCH 


00241 


140 262 


000 




JTC 


WCHWAV 


00244 


106 3^2 


001 


FSTCP: 


CPi i 


STOP 


00247 


167 






Ex 


BSP 


00850 


106 3;34 


001 




CALL 


DECRTC 


00253 


160 270 


001 




JTS 


ARCH 


00256 


171 






Ex 


SF 


00257 


104 153 


000 




JMP 


FREAD 


00262 


303 




WCHWftY; 


LAD 




4=5*^63 


271 






CPS 





STOP Pi^y TAPE MOTION 
SELECT THE SVSTEM DECK 

mORESS THE CASSETTE /MECHANISM 

STOP ANV TAPE WTIQN 

SELECT THE DATA DECK 

WAIT FOR DECK SELECTION 

ThE REQUISTED FILE NUMBER MUST BE 

POSITIVE 

INITIALIZE THE STARTING LOCATION MSB 
FOR •• NOTHING LOADED - FLAG 



WAIT FOR EtID CF RECORD 

INITIALIZE' THE RE-TRY COUNT 
/■*^IT FOR DATA CP LEADER 

QUIT IF LEADER 

GET THE RECORD T^/PE 

SAVE IT 

GET THE f^CORD TVPE CQMPL£^£NTED 

UN-COH=>LEf-ENT IT 

Tt^ TWO hVST MATCH 

IGNtMI NLWERIC F^CCPDS 

IGf-CRE SVKBOLIC F^CCPDS 

ELSE IT M-'ST BE AN ECf RECORD 

GET THE FILE NLWBER 

SAVE IT 

i3ET THE FILE NUMBER CCi-PLEP-iENTED 

LN-CC^MPLE^£:NT IT 

h«hCE SLf^ T/-E TWO ^«TCH 

MAKE SURE THIS IS THE O-d OF THE RECCPD 

STOP Tt^ TAPE 
BACK UP C-V-ER THE RECu^D 
DECRE>eNT THE RE-TRV COUNT 
OLJIT IF TCO MANV' F£- TRIES 
RE- INITIATE FORWRD i-VTIiM 

SEE IF h£: ARE THERE VET 



Pf¥5E 



S£00 QPERATINil SYSTEM - iZe/iZS-''-?! - LOADER 



H.S.P. 



00864 


160 


150 


000 


JTS 


FNExT 


00267 


150 


037 


001 


JTZ 


NxTREC 


00£7£ 


106 


322 


001 


CALL 


STOP 


00275 


173 






Ex 


SB 


00276 


106 


350 


001 


BhWIT: CALL 


RTINIT 


00301 


eE6 


006 




LC 


6 


00303 


106 


3i^'5 


001 


CALL 


TJ-JAIT 


00:306 


044 


002 




ND 


P 


00310 


110 


270 


001 


^FZ 


ARijH 


00313 


:365 






BREAD; LLH 




00314 


354 






LHE 




00315 


343 






iFD 




00316 


330 






LDA 




00317 


106 


360 


001 


CALL 


r^TCH 


00322 


100 


313 


0243 


J^C 


BREAD 


00325 


304 






LAE 




00326 


054 


377 




xR 


0377 


00330 


273 






CPD 




00331 


110 


eel 


001 


^2 


BSTCP 


00334 


074 


303 




CP 


0303 


00336 


150 


276 


000 


JTZ 


BHAIT 


00341 


074 


347 




CP 


0347 


00343 


150 


276 


000 


JTZ 


BHAIT 


00346 


074 


201 




CP 


0201 


00350 


110 


021 


001 


J'Z 


BSTtP 


00353 


306 






LAL 




00354 


054 


377 




XR 


0377 


00356 


PPC, 






SUH 




00357 


110 


021 


001 


JFZ 


m:TCP 


00362 


340 






iFA 




£32363 


0e6 


010 




LC 


8 


00365 


:305 






FLIP; LAH 




00366 


012 






SRC 




00367 


350 






Lm 




00370 


304 






LAE 




00371 


£10 






AC;A 




00372 


340 






LEA 




00373 


302 






LAC; 




00374 


024 


001 




SU 


1 


00376 


320 






LCA 




00377 


110 


365 


000 


JFZ 


FLIP 


00402 


304 






L.AE 




0040S 


271 






CPB 




00404 


160 


270 


001 


JTS 


ARGH 


00407 


110 


£76 


000 


JFZ 


BWAIT 


00412 


106 


3PP 


001 


FSTART; CALL 


STOP 


00415 


171 






Ex 


SF 


00416 


104 


150 


000 


J^P 


FNEXT 


00421 


106 


322 


001 


ESTOP; CALL 


STOP 


00424 


161 






EX 


RBK 


0042^5 


106 


334 


001 


CALL 


DECRTC 


00430 


160 


270 


001 


JTS 


ARGH 


00433 


173 






Ex 


SB 


0S434 


104 


313 


000 


J^p 


BREAD 



KEEP GOING IF NOT FAR EN0Ui3H 
START LOADING IF THERE 
ELSE STOP THE TAPE 
AND START SEARCHING BACW-«RD 
INITIATE THE RE-TRy' COUNT 
HAIT FOR DATA OR LEADER 

QLiIT IF LEADER 

PUSH THE CHAR C-NTO THE STACK 



GET THE ^ExT RECORD CHARACTER 

GET THE RECORD TVPE COh*>LEMENTED 

LN-CCWPLEMENT IT 

IT MUST MhTCH THE TYPE 

IGNORE NLMERIC f^CCiRDS 

IGfC'RE SyMBC-LIC RECORDS 

ELSE IT M-'ST BE AN ECF RECORD 

GET THE FILE f-*>fBER COMPLEMENTED 

L^i-COMPLE^CNT IT 

MAKE SiME IT MATCHES THE FILE /--iLMBER 

FLIP OVER THE FILE NU-ffiER 



COMPARE IT TO ThE ECSIRED FILE NU-fBER 

IT AINT THERE 

WE HAVEN'T Ga-£: BACK FAR ENC-UGH 

ELSE STOP THE TAPE 

f^HD START GOING FORWARD AGAIN 

TRV THAT RECORD IN REVERSE AGAIN 

DECREMENT THE RE-TRV COLNT 
QLJIT IF TOO MANV' RE-TRIES 
RE- INITIATE BACKW^'D MOTION 



PAt^ 



2200 C-PERATING SVSTEM - ee/05/71 - LG^iDER 



H.S.P, 



REftD IN A DATA RECORD HEADER 



00437 


106 


350 


001 


00442 


eee 


eP0 




00444 


106 


325 


001 


00447 


106 


360 001 


00452 


140 


047 


001 


00455 


330 






00456 


106 


:3fi0 001 


00461 


054 


377 




004&3 


273 






00464 


110 


304 


001 


00467 


074 


347 




00471 


150 


042 


001 


00474 


074 


■303 




0(0476 


150 


130 001 


00501 


074 


201 




00503 


110 


304 


001 


00506 


106 


322 


001 


00511 


167 






00512 


106 


323 


001 


00515 


088 


0// 


056 000 


00521 


307 






00Spi^ 


£6£> 






00523 


150 


270 


001 


00526 


^"^JFi 






00527 


007 






00530 


106 


;3fi0 


001 


00533 


350 






00534 


106 


360 001 


00537 


360 






00540 


106 


:^i60 


001 


02543 


3;30 






00544 


106 


360 004 


00547 


340 






£93550 


106 


360 


001 


00553 


0EM 


377 




00555 


273 






00556 


110 


304 


001 


00561 


106 


360 


001 


00564 


140 


■3&i 


001 


00567 


054 


377 




00571 


274 






00572 


110 


304 


001 


iSKBTS 


306 






00576 


325 






00577 


066 


076 


056 000 


00am 


374 






0mm 


066 


077 




00606 


373 






00607 


353 






00610 


364 






006U 


332 







NxTREC; 
^^TWAT; 

NEXTRV; 



N>;TONEr 



CALL 

LC 

CALL 

CALL 

JTC 

LDA 

CALL 

XR 

6PD 

JFZ 

CP 

JTZ 

CP 

JTZ 

CP 

JFZ 

CALL 

Ex 

CALL 

HL 

LAM 

C«A 

JTZ 

XRA 

RET 

CALL 

LHA 

CALL 

LLA 

CALL 

LDA 

CALL 

LEA 

CALL 

xR 

CPLi 

JFZ 

CALL 

JTC 

XR 

CPE 

JFZ 

LAL 

LCh 

HL 

LME 

LL 

LMD 

LHD 

LLE 

LDC 



RTINIT 

020 

TWAIT 

OETCH 

NEXTRV 

QEJC^ 

mil 

ftGfitlN 

0347 

NX J WAT 

0303 

mTCNE 

0201 

AGAIN 

BTCP 

BSP 

dhait 

RLN*+2 



ARGH 

GETCH 

GETCH 

i^TCH 

GETCH 

GETCH 
0577 

AGAIN 
i3tTCH 
Ai3A IN 
0377 

AfGAIN 

RUN$+1 
PUhi$+£ 



INITIALIZE THE RE-TRV COUNT 
WAIT FOi IRG 

i5ET THE RECORD TYPE 

WAIT FOR DATA 

SAVE THE RECORD TVPE 

GET THE RECORD TVPE COMPLEMENTED 

UN-COMPLEMENT IT 

THE TWO ML'ST MATCH 

IGNORE SVBOLIC RECORDS 

LC»^D NUMERIC RECORDS 

QUIT ON ECF MARKER 

STOP THE TAPE 

BACK UP TO THE END OF THE FILE 

Mf^E SLRE SOMETHING WAS LOADED 



ERROR EXIT IF tOT 

ELSE SET THE ZERO CONDI TIC'N 

AND QLiIT 

GET THE PPfklTV INITIALIZATIC#J VPLLCS 

IN H fXPJ AND L iCPJ 



GET THE STARTING ADDRESS IN DE 



GET IT A3AIN FCR A ChECK 

IT IS COt^PLE^iENTED THIS TIME 



CATCH T/-E RECORD BEIN3 OVER ALREADV' 
UN-COMPLEMENT 



SAVE THE PARI TV ACCLMJLATORS >■ . 

STORE THE STARTI/-JG ADDRESS IN RUN* JL^F' 

SET STORAGE POINTER TO STPfiTING ADDRESS 
FESTOPE THE PARI TV ACCUMULATORS 
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£200 OPERATING SVSTEIM - £2/05/71 - LQ^ffiER 



H.S.P. 



00612 


£55 




xRH 




00613 


012 




SRC 




00614 


£56 




XRL 




00615 


01£ 




SRC 




00616 


255 




xRH 




00617 


012 




SRC 




(2S0620 


256 




XRL 




00621 


012 




Sf^C 




00P.-p:>. 


340 




1 FA 




00623 


305 




LAH 








.• LOAD 


A RECORD ftCCU 


0eBS4 


106 :360 001 


NxTBVT: 


CALL 


GETCH 


00627 


140 277 001 




JTC 


ECR 


00632 


320 




LCA 




00633 


253 




XRD 




00634 


330 




LDA 




00635 


302 




LAC: 




00636 


254 




XRE 




00637 


012 




SRC- 




00640 


340 




LEA 




00641 


306 




LAL 




00642 


024 000 




SU 


PEND 


00644 


:305 




LAH 




r.P5fi45 


034 002 




SB 


PEND>e 


00647 


160 270 001 




JTS 


ARGH 


00652 ■ 


372 




LMC: 




00653 


306 




LAL 




00654 


004 001 




AD 


1 


00656 


360 




1 / A 




00657 


305 




LAH 




00660 


014 000 




AC- 





00662 


044 037 




ND 


037 


00664 


350 




LHA 




00665 


104 224 001 




^■IP 


iSXTBYT 


00670 


106 322 001 


ARGH; 


CALL 


STCT 


00673 


064 mi 




OR 


1 


00675 


012 




SRC 




i?Vif,7e 


007 




PET 




F<0677 


303 


EQR; 


LAD 




00700 


264 




ORE 




00701 


150 037 001 




JTZ 


ht<TPEC 


00704 


106 S-^^' 001 


AGAIN; 


CALL 


STCP 


£0707 


167 




Ex 


BSP 


00710 


106 334 001 




CALL 


IXICRTC 


00713 


lEJZ 270 001 




JTS 


ARGH 


00716 


171 




Ex 


SF 


00717 


104 047 001 




Jt-iP 


NExTRV 






] UTILITV R-OUTINES 


00722 


177 


STCP; 


Ex 


TSTQP 


00723 


0£6 001 


DWAIT; 


LC 


1 



ACC^XULATE IN THE STARTING ADDRESS 



GET A BVTE OF DATA 
CPiTCH END Cf- RECORD 
ELSE SA*vC IT 
ACCUhCLATE THE P^ITIES 



PREVENT LC*^DING INTO THE LOACCR 



STORE ThE DATA IF ADDRESS OKAY 
INCREMENT THE MEMORV 'ADDRESS 



DO h-EMQRV' WRAP-ARObND 

GET THE NEXT DATA BVTE 

STOP THE TAPE 

INDICATE ABCRTI^C EXIT WITH CARRY TC-aSLE 



CHECK PARI TV ACCUMLLATIONS 



TRV THAT RECC-RD AGAIN 

DECREMENT THE RE- TRV COUNT 
QL'IT IF TOO MANV RE- TRIES 
RE- INITIATE FCRhARD MOTION 
fiND TR-/ THE RECORD AGAIN 



STCP THE TAPE 

Hf)IT FOR DECK READV 



PAGE 



2£00 OPERA) IM3 SVSiEH - 0£/i35.'7l - LuhLCR 



H . S . P . 



00725 1£3 

00726 101 

00727 £42 

00730 150 326 001 

00733 007 

007:3^ 106 323 001 

00737 066 377 056 001 

00743 307 

00744 024 001 

00746 370 

00747 007 

00750 066 377 056 001 

00754 006 003 

00756 370 

00757 007 

00760 123 

00761 101 

00762 044 024 
00764 150 360 001 
00767 002 

00770 002 

00771 002 

00772 002 

00773 043 

00774 125 

00775 101 

00776 007 



Th^IT: Ex STATUS 

HfilTL: IN 

JT2 l-filTL 
FkET 

DECRTC: CALL Di-JAIT 
■HL RTC 

LAf'l 

SU 1 

LMA 
RET 

RTINITr HL RTC 
LA 3 
U-lA 
RET 

GETCH; EX STATUS 

IN 

■ NO 024 

J(^ GtTCH 
SLC 
SLC 
SLC 
SLC 
RTC 

t-X i.JATA 

IN 
RET 



J-JAi J FCfi SPECIFIED STAlUS 



J-JAIT FCf< I/O CPERAlICtV 
DECRENENT THE RE -TRY COJ-iT 



INITIATE THE .RE-TKY oOuNl 
TO TRV FOjR TIMES 



GlT a CHhKACTEk 
hlHlJ FCfi DhilH OR IRG 



Ef-iU Ui- RECORu 

Else GET ThE CHARAC;TER 



SJ&ll f 000 

01000 



, SVS)£>1 STORfH-iL 

RTC: Lmj 

PEI-D: EQU * 



RE -TRV CCU^JT 

Et-D OF LCwLCR LLCATION 



rcfc 
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£200 OP£RATI^G SVSTEM - 0£/05/71 - MftIN SECTION 



H.S.P. 



, CPERPiTim SYSTEM CQMHW^ DECODER 



£5000 




SET 


t?R/500 • 


05000 


016 001 


LB 


1 


050ee 


106 100 000 


CALL 


LOAD* 


05005 


100 017 01£ 


JTC 


GOODL 


05010 


066 001 056 013 


H_ 


BDCMSG 


05014 


104 046 012 


JMP 


^CCAT 


£5017 


006 341 


'300DL.' LA 


0341 


05£ei 


121 


Ex 


ADR 


050SE 


101 


IN 




050S3 


044 004 


ND 


4 


05025 


110 042 012 


JFZ 


0S$ 


05030 


£^6 171 056 037 


HL 


ALPFN 


£S03*+ 


:307 


LAM 




05035 


260 


C«A 




£E£S6 


310 


LBA 




05£S7 


110 201 037 


JFZ 


MAUTO$ 


0504E 


066 303 £56 012 


OS$-^i HL 


OSMSG 


£5046 


106 151 036 


NOCAT; CAl 1 


DSPLV* 


05051 


066 367 056 012 


NXTCMD; liL 


RD-ZMSG 


05055 


106 151 036 


CALL 


DSPLy$ 


05060 


ma 151 056 015 


HL 


CMDBUF 


05064 


046 013 036 000 


EE 


11 


05070 


026 024 


LC 


20 


0507e 


106 000 036 


CALL 


KEVIN* 


05fe//t) 


066 362 056 012 


HL 


CRLF 


£5101 


106 151 036 


CALL 


DSPLV* 


05104 


250 


XRA 




£5105 


131 


Ex 


CC«1 


05106 


066 150 056 015 


HL 


I^PTR 


£5112 


006 151 


LA 


CMDfit^F 


05114 


370 


LMA 




£5115 


106 316 013 


CALL 


GETSYM 


05120 


066 200 056 037 


HL. 


SvMBCL+6 


05124 


307 


LAM 




05125 


074 015 


CP 


015 


£5127 


150 144 012 


JTZ 


FNDCMD 


£51:32 


074 055 


CP 


■ _ •' 


05134 


150 144 012 


JTZ 


FNDCMD 


05137 


074 040 


CP 




05141 


110 264 012 


^Z 


BADCh© 


£5144 


066 175 056 037 


FND12MD: HL 


SYMBOL +3 


05150 


016 040 


LS 




05152 


026 00:3 


LC 


3 


£5154 


106 040 014 


CA(-L 


BLKSET 


05157 


046 000 036 015 


DE 


CMO-ST 


05163 


106 264 037 


CALL 


LCCKLP 


05166 


306 


LAL 




05167 


044 370 


ND 


0370 


05171 


004 £06 


AD 


6 


05173 


360 


LLA 




£5174 


347 


LEM 





LOAD THE TAPE DIRECTC^V' 

IT LOADED OKAV 

ELSE PRINT CAT LN-LCAE»^BLE MSG 

KEVBO^RD SNITCH 0*/ERRIDES AUTO-LOAD 



RUN ANV' AUTO-LOAD PROGRAH 

PRINT THE START-UP ^eSSAGE 

PRINT -'READV-- 

INPUT THE COMMAND 

POSITION THE CiJRSOR FOR ENTRV 

C-N-V ACCEPT 20 CHARACTER 



DO CRLF AFTER CCff^j^JD ENTRV 
KEEP Tt^ CLRSOR CTF 

INITIPLim THE SCANNER POINTER 



GET }HE CCM'IAND SVMBOL 

ChECK THE TERMINATI.^^G CHARACTER 

IT t4JST BE m ENTER 

A DASH 

OR A SPACE 

L«SE C-NLV THE FIRST THREE CHARACTERS 

LOOK IT UP IN THE COht-VMJ LIST 

POINT THE ^O-jORV POINTER TO THE 
BRANCH ADDRESS 
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22M> CPERfiTING SYSTEM - S^/S^yJl - MAIN SECTION 



H.S.P. 



05175 

essm 

05201 
05205 
05206 
05212 
05213 
05216 



05221 
05225 
052'30 
05234 
05237 
05243 
05246 
05252 
05255 
05261 
05264 
05270 
05272 
05274 
05277 

05:300 
05:30:3 

05314 
05:362 
05367 
05401 
05431 
05442 
05457 
05473 
05511 
05526 
05543 
05557 
05566 
05617 

05625 
05626 
05630 
05631 
eB632 
05634 
056:35 
05636 
05640 
05641 



106 353 0:36 

337 

066 214 (256 012 

374 

066 215 056 012 

373 

106 264 012 

104 051 012 



066 
104 
066 
104 
066 
104 
066 
104 
066 

104 

066 
036 
046 
106 
151 
104 

011 

103 
011 
011 
011 
102 
114 
116 
116 
116 
101 
101 
040 
011 
127 



073 
270 
111 
270 
0:31 
270 
042 
270 
057 
270 
217 

000 

013 
151 



056 013 
012 

056 013 
012 

056 013 
01£ 

056 013 
012 

£S6 013 
012 
056 013 



036 



051 012 



000 

117 

000 
000 
000 
101 
111 
101 
101 

117 
125 
125 
040 

000 

110 



013 

115 
013 
013 
013 
104 
102 
115 
115 
040 
124 
124 

040 

013 
101 



000 

120 
013 
013 
013 
040 
122 
105 
105 
123 
117 
117 
040 
013 
124 



001 

002 016 
000 
002 
002 016 

000 

003 

004 037 
166 
005 



CBI: 



CALL 

LDM 

HL 

LME 

HL 

LMD 

CALL 

JMP 



INCHL 
CBI+1 

CBI +2 

BADCMD 
NxTCMD 



PUT THE ADDRESS IN THE JUMP INSTRUCTION 



, ERRC-R ^jESSAGES 



NAMREQ; 

/nQNAMEj 

BADNAM; 

CATFLL; 

DUPNt:^M; 

BADDMD; 
BADSPL; 



OSMSG; 



HL 

Jt-P 

HL 

JMP 

HL 

JMP 

HL 

^tP 

HL 

J^P 

HL 

LD 

LE 

CALL 

Ex 

JMP 



DC 
DC 
DC 
DC 
DC 



CRLF: 
RD-y-hlSG: 
BEiCMSG; 

BD/nWSGj DC 

CFLMSG: DC 

DLPhiSG: DC 

NRQMSG; DC 

f-ia^^jSG; DC 

N0AM3G; DC 

AUTHSG: DC 

AUTENT: DC 

CBTMSG: DC 

BCMSG; C€ 

DIPKT; DC: 
DA 
DC 

D2PKT: DC- 

m 

DC 

CAiPAK: DC 

DA 

DC 

OBJPKT; EC 



NRQMSG 

BADSPL 

NO/^/MSG 

BADSPL 

BDNMSG 

BADSPL 

CTLMSG 

BADSPL 

tJLPMSG 

BADSPL 

BCMSG 



11 

DSPLV* 

BEEP - 

NxTCMD 

011>0.013,0.eei,011.23-013. 11 

•'COMPUTER TERMINAL OPERATING SYSTEM '- 023. ££3. 023. 01S 

011.0-013-11.015 

011.0.013,11- •■READV-'.015 

01 1 . 0. 013. 1 1 . 022. ■■ CATALOG UNLQADABLE ' . 015 

•BAD NA^f:••.015 

••LIBRARV rLl.L'.015 

•■J-NiAME IN USE •'.015 

•7*¥>C REQLiIRED^'.015 

••;n)0 SLCH fv|AME'.015 

••AUTO NOT SET •■.015 

'AUTO SET TO •' 

•■ . 015 
011.0.013. 11.022. •TRC'NT TAPE SCRATCH? •'. 015 

-'WWT?^'.015 



DECK CihE IS LOGICAL FILE ONE 
DECK TWO IS LOGICAL FILE TWO 
CATALOG IS L03ICAL FILE THREE 



1 

TFRBLF 



TFRBUF 



3 

CATW 

ALPFN-CATW+1 

5 OBJECT FILE IS LOGICAL FILE FIVE 



PAGE 



££00 OPERATING SYSTEM - 0e/(ZS/71 - MAIN SECTION' 



H.B,P. 



05&4£ 
05644 



05645 
05647 
05650 
05651 
05652 
05654 



05655 
05660 
0Ee6£ 
05665 
05667 
0567® 
05672 
05675 
05701 
05704 
05705 
05707 
05712 
05713 
05715 



05716 

05720 
05722 
05726 
05731 
05/3:3 
05736 
05740 
05743 
05745 
05750 
05752 
05753 
05754 
05755 
05757 
05761 
05762 
05765 
£5767 
05772 
05774 



002 016 
000 



024 010 

012 

012 

012 

004 002 

007 



106 316 013 

074 015 

110 237 012 

066 172 

:307 

074 040 

150 221 012 

046 010 036 0^:7 

106 264 037 

306 

044 007 

150 230 012 

306 

044 370 

007 



CALCULATE A PHVSICAL FILE NUMBER FROM CATALOG PDZfCSS 



NCALC: 



DA 


I/-RBUF 


DC 





ATE A 


PHVSIC/ 


SU 


CAT 


SRC 




SRC 




SRC 




AD 


2 


RET 





SCPN OFF A NAME AND LOOK IT LP 

(3ET THE NfthiE 



GETNAM>K CALL GETSVM 

GETNAN: CP 015 

JF2 BAD^^iAM 

LL SVb-BO- 
LAM 

CP ■■ ' 

JT2 NA^f^EQ 

GETNt^'r DE CrtT 

CALL LCCKLP 

LAL 

ND 7 

JT2 ^CNAME 

LAL 

ND 0370 

RET 



TERMimTING C^mf^JEP. ^)UST BE AN 015 
GET THE FIRST CHARACTER 



THERE MUST BE A NA^C 
LOOK IT LP IN THE CATALOG 



IT ISN'T THERE 

SET TABLE POINTER TO BEGINNING OF ENTRV' 



016 
026 
066 
106 
026 
106 
074 
160 
074 
120 
056 
362 
370 
•302 
074 
014 
320 
106 
074 
160 
074 
160 



040 

007 

172 056 037 

040 014 

172 

010 014 
101 

002 014 
133 

0eE 014 
037 



200 

000 
010 014 

060 

002 014 
072 
350 013 



OPERATING SVSTEM LEXICAL SCANNING SUBROUTINES 

•• •• BLANf-C THE SVhJBC-L STCRf*3E 



UETSVM; LB 

LC 

HL SVTiBCi. 

CALL BLKSET 

LC SyMBC-L 

CALL GETCH 
GETLTR: CP 

JlS 

CP 

GEjNBR.' LH 
LLC 
LMA 
LAC 
CP 
AC 
LCA 

CALL GETCH 
CP 
JTS 
CP 
JTS 



7 



■•A-' 

GETERM 
•'Z-'+l 
GETERM 
Svt-BOL >» 



SVKBOL+6 



•■0-' 

GET£?»-J 
■•9-+1 
GETNBR 



INITIALIZE THE SVMBOL STC-RAGE POINTER 
GET THE FIRST Cf-*¥iACT£R 
OR BETHEEN A ^D Z 



STCiRE THE CHARACTER 



BU^P THE STC«Ai3E INDEX 

UNLESS IT IS AT THE END CF THE STQRAi3E 



GET THE NExT CH«^ACT£R 

CHECK IT-'S RANGE BETWEEN AND 9 
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H.S.P. 



mill 


104 


33b 


013 






JMP 


GETLTR 


FiPffiez 


066 


£00 


056 


037 


GETERHj 


; HL 


SVMBOL+e 


06036 


370 










LMA 




06007 


007 










RET 














] GET " 


The: tCKT ChWRACTi 


£^010 


066 


150 


£56 


015 


GETCH: 


H_ 


I.NPTR 


tp-iPimu 


307 










LAM 




PifVliB 


310 










LBA 




06016 


004 


001 








AD 


1 


£B0£0 


370 










U^ 




06eEl 


361 










LLB 




I3BI3£S 


307 










LAM 




06ee3 


074 


015 








CP 


015 


062^5 


013 










RF2 




06ee6 


066 


150 








LL 


INPTR 


0fii'i:30 


307 










LAM 




0603i 


0£4 


001 








3U 


1 


06033 


370 










U^ 




£6034 


£50 










xRfi 




06035 


006 


015 








LA 


015 


0^4^37 


007 










RET 





5TC«E ThE TERMimTING CHARACTER 



GET THE INPL'T POINTER 

SAVE IT 

BL^P IT TO THE NExJ CHARACTER 

GET THE CHARACTER POINTED TO 

EXIT IF NOT CR 

ELSE DECREhCNT THE CHARACTER POINTER 



AND Exit WITH ZERO CONDITION TRUE 
AND WITH A 015 



SET A BLOCK OF CORE TO 
STARTING ADDRESS IN HLi 



THE B REGISTER CONTENTS 
N-MBER CF POSITIONS IN C 



06040 


371 








R/ KSET: LMB 




06041 


106 


353 


0:36 




CALL 


n^HL 


06044 


30£ 








LAC 




06045 


0£4 


001 






SU 


1 


06047 


3£0 








LCA 




06050 


110 


040 


014 




JF2 


BLKSET 


06053 


007 








RET 
. STC-RAGE 




06400 










TP 




06400 


103 


101 


1£4 


040 


CMO-ST; DC: 


■'CAT 


06406 


003 


017 






DA 


C«TCMD 


06410 


116 


101 


115 


040 


DC • 


■■N^i 


06416 


1£7 


017 






DA 


NPMCMD 


064£0 


1£2 


1£5 


116 


040 


DC 


•■RL!N 


064£6 


£67 


i^po 






DA 


RUNCMD 


064:30 


111 


116 


040 


040 


DC 


■'IN 


06436 


£b3 


017 






DA 


INCWD 


06440 


117 1£5 


1£4 


040 


DC 


•'OUT 


06446 


036 


0£0 






DPi 


OUTCWD 


06450 


104 


105 


114 


040 


DC 


••DEL 


06456 


147 


0£1 






DA 


DELCMD 


06460 


1££ 


105 


1£0 


040 


DC: 


-REP 


06466 


341 


0£0 






DA- 


REPCMD 


06470 


101 


1£5 


1£4 


040 


EC 


■•AUT 


06476 


344 


epp 






DA 


AL'TCMD 



COf^lAND LIST 
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H.S..P. 



m'^^^ei 


115 


101 


116 


040 




DC 


•MAN 


06506 


031 


023 








DA 


MANCMD 


06510 


120 


122 


105 


040 




DC 


'PRE 


06516 


0/3 


023 








DA 


PRECMD 


06520 


110 


105 


130 


040 




DC 


-H^ 


065£6 


250 


023 








DA 


HExCMD 


06530 


104 


105 


102 


040 




DC 


•DEB 


06536 


203 


034 








DA 


DEELG$ 


06540 


040 


040 


040 


040 




DC 




06546 


£64 


012 








m 


BADCMD 


06550 


000 








I/nPTR: 


DC 





(<ifiS51 










CMDBUF: 


SKIP 


22 


06577 


000 








CATPTR; 


DC 





mE£i0 


000 








CSCPTR; 


DC 


(2 


06601 


040 


040 


040 


040 


CATSPS; 


DC 


•' 


0661£ 


000 








ENTSAV: 


DC 





06613 


000 








PFNSEL: 


DC 





06614 


000 








PFNCTR; 


DC 





070l'5f5 












TP 




070m 


000 


000 








DC 


0,0 


0700P 










li-kBLF: 


SKIP 


254 












'. LIST 


THE CATALOG 


07402 


066 


177 


0ES 


015 


CATCMD; 


Hu 


CATPTR 


07404 


006 


010 








LA 


CAT 


07406 


370 










LMA 




07407 


066 


200 








LL 


CSCPTR 


07411 


!="W> 










xRA 




07412 


370 










Lm 




07413 


0<F;6 


177 056 


015 


CATLCP.- 


HL 


CATPTR 


07417 


367 










) / M 




07420 


056 


037 








LH 


CAT>8 


07422 


307 










LAM 




07423 


074 


040 








CP 


.' 


07425 


150 


117 017 






JTZ 


CAiLND 


07430 


074 


052 








CP 


••$•• 


07432 


150 


117 017 






JTZ 


CAIL^-1D 


07435 


046 


201 


036 


015 




DE 


CATSPS 


07441 


02e 


006 








LC 


6 


07443 


106 


345 


037 






C¥^L 


Ri KTFR 


07446 


066 


200 


056 


015 




H_ 


CSCPTR 


07452 


337 










LDM 




07453 


303 










LAD 




07454 


074 


111 








CP 


73 


07456 


160 


070 


017 






JTS 


CATMOR 


07461 


066 


362 


056 


012 




HL 


CRLF 


07465 


106 


151 


036 






CALL 


DSPLV* 


07470 


046 


013 






CAT^^OR: 


LE 


11 


07472 


066 


£01 


056 


015 




HL 


CfiTSPS 


07476 


106 


151 


0:^ 






CALL 


DSPLV* 


07501 


066 


200 


056 


015 




HL 


CSCPTR 


07512S 


373 










LMD 




07506 


066 


177 








LL 


CATPTR 



INPUT SCANNER INDEX 

LIBRARV' CATALOG POINTER 
CATALOG SCREEN POINTED 
CATALOG NAME PRINT STRING 
CATALOG ENTRV ADDRESS STOPfiiGE 
PHVSICAL FILE ^*JMBER SELECTED 
PHV'SICAL FILE NUMBER COUNTER 

PARITV STOkPii:^ FOR I/O ROUTINES 
I/O TRANSFER BUFFER 



INITIALIZE TtC CATALOG POINTER 

INITIALIZE THE SCREO^^ POSITIC-N 

GET THE ADDRESS OF THE NExT CAT ENTRV 

GET THE FIRST Ch*:«ACTER 

LISTING IS FINISHED IF IT IS A SPACE 

OR AN ASTERISK 

TRPt4SFEFi h*=!ME INTO PRINT STRING 

*3ET THE CLRSCR POSITION 

SEH IF HE NEED TO GO TO A NEW LINE 

PUT Out cr lf if so 

ALWAVS PRINT ON LINE 11 
PRINT THE NAME 

UPDATE THE CF^SOR POSITION 

UPDATE THE CATALOG ENTRV POSITION 



PAiSE 1£ 



200 OPERATING SVSTEM - 0S/05/71 - WIN SECTION 



H.S.P. 



07510 
07511 
07513 
07514 
07517 
07523 
07526 



07527 

07532 

07534 

07537 

07541 

07542 

07544 

07547 

07553 

07556 

07557 

07561 

07564 

07565 

07566 

07570 

07574 

07575 

07577 

07600 

07603 

07605 

07610 

07614 

07615 

07617 

07^2 

07626 

07631 

07632 

07634 

07637 

07643 

07644 

07646 

07647 

07653 

07655 

07660 



07663 
07666 



307 

004 010 

370 

104 013 017 

066 362 056 012 

106 151 036 

007 



LAM 
AD 
LMA 
JMP 
CATEND; HL 



CATLCP 
CRLF 

CALL DSPLV* 

RET 



DO NEXT ENTRV 

MAKE ROOM FOR NEXT CCM-*^ND 



CHANGE THE FILE f^*^ME 



106 
074 
110 
066 
307 
074 
150 
046 
106 
:306 
044 
150 
335 
306 
044 
066 
370 
066 
373 
106 
074 

110 

066 
307 
074 
150 
046 
106 
306 
044 
110 
066 
347 
066 
337 
066 
026 
106 
104 



316 013 
054 

237 012 
172 

040 

221 012 
010 036 037 
264 037 

007 
2-30 012 



370 

177 056 015 

200 

316 013 
015 

237 012 
172 056 037 

040 

221 012 
010 036 037 
264 037 

007 

255 012 
177 056 015 

200 

172 056 037 
006 

345 037 
054 023 



NAMCMD; CALL 
CP 
JF2 
LL 
LAM 
CP 
JT2 
X 
CALL 
LAL 
ND 
JT2 
LEH 
LAL 
NU 
HL 
LMA 
LL 
LMD 
CALL 
CP 
JF2 
HL 
LAM 
CP 
JTZ 
DE 
CALL 
LAL 
ND 
JFZ 
HL 
LEM 
LL 
LDM 
HL 
LC 
CALL 
^«P 



GET3VM 

BADNAM 
SVMBOL 



NA^«EQ 

CfiT 

LOOKUP 

7 
NCM^ME 



0370 

CATPTR 

CSCPTR 

GETSVM 
015 
BAD(■*)^i 
SVMBOL 



Cf)l 
LOCKUP 

7 

DLPNm 
CPiTPTR 

CSCPTR 

SV'MB(X 

6 

BLKTFR 

LPCAT 



GET the: old NAME 

IT MUST BE TERMINATED BV A COMMA 



THERE MUST BE A NAME 
LOOK IT LP 



IT MJST BE IN CATALOG 
SAVE THE CATALOG POINTER 



106 300 017 
046 241 036 013 



. BRING A NEH OB^CT FILE 

INCMD; CALL It-miT 
DE OBJPKT 



GET ThE NEW hfHE 

ThE NEW /^JA^E MUST BE TEF^imTED BV 015 



THERE M;ST BE A NEW NAME 

IT MUST NOT ALREADV BE IN Th^ CATALOG 



RESTC-RE THE CATALOG POINTER 

TRANSFER THE SVMBOL INTO THE CATALOG 

UPDATE THE CATALOG FILE 

INTO THE SVSGEM 

DO THE PART CC-MMON WITH hExChiD 

GET TO THE BEGINNING OF THE INPUT FILE 



PfiGE 
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H.S.P. 



07672 


106 022 


030 




CALL 


PBCF$ 


07675 


104 076 


021 




JMP 


REPFIL 


t3/'/00 


le© 316 


013 




iNGET; CALL 


GETSVM 


0/'/03 


074 015 






CP 


015 


0/'/<05 


110 237 


012 




JTZ 


BADNAM 


to//'10 


066 172 






LL 


SYMBOL 


07712 


307 






LAM 




t://'/'13 


074 040 






CP 


•■ •■ 


07715 


150 221 


012 




JTZ 


f*MREQ 


07720 


046 010 


036 


037 


!£. 


CAT 


07724 


106 264 


037 




INExT: CALL 


LOOKLP 


077S7 


074 052 






CP 


••;*;•• 


©/./dl 


150 246 


012 




UIZ 


CATFUL 


to//y4 


•306 






LAL 




Id //-SB 


044 007 






ND 


7 


0//37 


110 ^55 


012 




JFZ 


DUPNAM 


07742 


335 






LDH 




0^/43 


306 






LAL 




0/'/'44 


044 370 






ND 


0370 


07746 


340 






LEA 




07747 


066 -^12 


056 


015 


.HL 


ENTSAV 


0//S3 


370 






LW 




0//^ 


066 172 


056 


037 


HL 


SVMBOL 


to/'/60 


026 006 






LC 


6 


07762 


10B 345 


037 




CALL 


BLKTFR 


0//65 


066 212 


056 


015 


HL 


ENTSAV 


0/'//! 


307 






LAM 




07772 


106 245 


013 




CALL 


NCALC 


0///^ 


370 






LWA 




0///6 


024 001 






SU 


1 


10000 


046 ^^ 


036 


013 


DE 


dip^;t 


10004 


106 033 


030 




CALL 


CPFN$ 


10007 


046 ^P<=, 


036 


013 


DE 


DIPKT 


10013 


■106 FPP 


030 




CALL 


PBQF* 


10016 


046 225 


036 


013 


ce 


DIPKT 


100S2 


106 017 030 




CALL 


PEOF$ 


10025 


066 212 


056- 


015 


HL 


ENTSAV 


10031 


307 






LAM 




10032 


106 174 


023 




CALL 


DIFNH 


10035 


007 






RET 












'. WTPUT AN n r^ENT 


10036 


106 316 


013 




OUTCMD; CALL 


GETSVM 


10041 


074 052 






CP 


^*-- 


10043 


150 166 


020 




JTZ 


OL'TALL 


10046 


074 044 






CP 


■■$■■ 


10050 


150 166 


020 




JTZ 


OUTALL 


10053 


106 260 


013 




CALL 


GETNAN 


10056 


106 245 


013 




CALL 


NCALC 


10061 


046 ?-?^S 


036 


013 


IE 


DIPKT 


100BS 


106 033 


030 




CALL 


CPFN* 



GET THE NAME SVMBOL 

TERNJINATING CHARACTER ML'ST BE 015 
GET THE FIRST CHWACTER •, 



THERE MUST BE A NAME 

LOOK LP THE Nfi^E IN Tt^ CATALOG 



CATALOG FULL IF FIRST Ci-*¥*ACTER IS * 



ENTRV MUST NOT BE IN THE TABLE 

PUT THE NEW NAME IN CATALOG 

BUMP ME^)CRV POINTER TO START O^ ENTRV 



SAVE THE CATALOG ADDRESS 

CALCULATE THE SELECTED FILE NLA-BER 

SAVE THE ELECTED FILE NUMBER 
POSITION DECK ONE TO THAT FILE 



GET TO THE END OF THAT FILE 
SO READV TO fiPPEND THE NEW ONE 
^TER THE NEW FILE MARKER RECORD 



GET THE ELEMENT Nf^E 
CHECM THE TERMINATING CHAR 
Ca=^- WHOLE SVSTEM TAPE IF * 

COPV ALL BL'T OS A^JD CAT IF $ 
ELSE DO THE REST OF GETNA^i 
CALCULATE THE PHV3ICAL FILE NLWBER 
POSITION SVSTEM TfPE TO THAT FILE 



PfiiGE 
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10070 


046 


PPC, 


036 013 


DE 


DIPKT 


10074 


1£B 


0RP. 


030 


CfU. 


PBCf"« 


100// 


106 


073 


ees- 


CALL 


PRECMD 


1010£' 


046 


241 


036 013 


re 


OBJPKT 


10106 


106 


ee2 


030 


CALL 


PBOF« 


101 ii 


046 


225 


036 013 


CiJl ItR: DE 


DIPKT 


10115 


106 


000 


0:30 


CALL 


S/nFR« 


10120 


140 


145 


020 


JTC 


OUTEND 


10123 


306 






LAL 




10124 


024 


002 




SU 


)^RBUF 


10126 


066 


244 


056 013 


HL 


OBJPKT+3 


10132 


370 






LMA 




10133 


046 


241 


036 013 


DE 


QK-PKT 


10137 


106 


006 


030 


CALL 


SBFm 


10142 


104 


111 


020 


JHP 


OUTTFR 


10145 


04b 


2-31 


036 013 


OL'TEND: DE 


rPPKT 


10151 


006 


177 




LA 


127 


10153 


106 


033 


0:30 


CALL 


CPFN* 


10156 ■ 


046 


2-31 


036 013 


DE 


I^PKT 


10162 


106 


044 


030 


CALL 


)^NW$ 


10165 


007 






RET 




10166 


06S 


172 




C-UTALL; LL 


SVMBOL 


10170 


307 






Lm 




10171 


074 


040 




CP 


.' 


10173 


110 


237 


012 


JFZ 


BADNAM 


10176 


066 


166 


056 013 


HL 


CBTf-lSG 


10202 


106 


151 


036 


CALL 


DSPLy$ 


10205 


151 






Ex 


BEEP 


10206 


377 






HALT 




10207 


006 


:360 




LA 


0360 


IfiEll 


121 






Ex 


ADR 


10212 


106 


146 


024 


CALL 


D^*^JT 


liZei5 


157 






Ex- 


DECK2 


10216 


106 


146 


024 


call 


DWAIT 


10^>-1 


175 






Ex- 


REWND 


10222 


106 


146 


024 


call 


DHAIT 


10225 


066 


000 


056 026 


HL 


BOC'TS 


10£':31 


046 


000 


036 030 


rc 


BOOTE 


102-35 


106 


213 


02-3 


CALL 


WBi OK 


10240 


106 


146 


024 


CALL 


DHAIT 


1(2^43 


066 


■PFiP'i 


056 037 


HL 


SYhiBOL+a 


10247 


307 






LAh-! 




10-P<=i3 


024 


044 




SU 


■'$■' 


10252 


150 


257 


020 


JTZ 


CUTSVS 


Ifi^'SS 


006 


002 




LA 


2 


10^57 


046 


225 


036 013 


C-uTSyS; DE 


DIPKT 


10263 


106 


033 


030 


CALL 


CPFN* 


102efi 


046 


PPS 


036 013 


DE 


DIPKT 


10272 


106 


022 


030 


CAI i 


PBcr* 


10275 


066 


214 


056 015 


HL 


PFNCTR 


10301 


IW^ 


377 




LA 


-1 


1030a 


370 






LMA 




10304 


106 


346 


021 


CALL 


UPDAT0 


10307 


006 


177 




LA 


127 



H.S.P, 



prep the data tape 
position to the output file 

put ol't the file 

read a reccfko from the svstem tape 

cj^tch end of file 

calculate the length 

put it in the output file length 

write out the record 

DO THE NExT RECORD 

PUT FILE MARKER 127 ON OUTPUT FILE 



THERE MJST NOT HAVE BEEN A NAME 



MAKE SURE THE FRONT TAPE IS SCRATCH 



mifiESS DECK 2 

REWIND THE TAPE 
WRITE THE BOOT BLOCK 



SEE IF THIS IS A FL(LL COPy 
C'R JUST FILES 2 TO THE END 

START COPVim FROM FILE 2ERC' 
START copy INS FRCfl FILE B-C' 



copy THE TAPE USING FIRST HALF OF UPDATE 
SET UP TO START WRITING FILE MARKERS AT 2 
TERMINATE THE DATA TAPE 



PftGE: 15 



2200 OPERATING SVSTEM - S^/SB/IX - MAIN SECTION 



H.S.P. 



10311- 


046 £'31 03S 013 


ix: 


IM^T 


10315 


106 033 030 


CALL 


CPFN$ 


10320 


046 231 036 013 


DE 


rePKT 


10324 


106 044 030 


CALL 


TFN^ 


10327 


106 146 024 


CAI 1 


OiftlT 


10332 


175 


EX- 


REHND 


10333 


106 146 024 


CALL 


DNAIT 


10336 


104 054 eB3 


Jfvp 


UPCAT 






'. REPLACE THE 


: NAMED F 


10341 


106 ;>55 013 


AEPCMD; call 


GETNAM 


10344 


066 212 056 015 


HL 


ENTSAV 


10350 


004 010 


AD 


8 


1035£: 


370 


Lm 




10353 


024 010 


SU 


8 


10355 


106 245 013 


CALL 


NCALC 


10360 


066 213 056 015 


HL 


PFNSEL 


10:364 


370 


LMA 




10365 


046 241 036 013 


te 


OSJPKT 


10371 


106 0i>-^ 030 


CALL 


PBCF* 


10374 


066 212 056 015 


HL 


ENTSAV 


10400 


:367 


LLM 




10401 


056 037 


LH 


CAT>S 


10403 


307 


LAM 




10404 


074 040 


CP 


-• 


10406 


150 053 021 


JT2 


REPLP 


10411 


074 052 


CP 




10413 


150 053 021 


JTZ 


I^J'LP 


10416 


046 241 03e 013 


DE 


OBJPKT 


10422 


106 017 030 


CAf i 


K:cf-$ 


10425 


066 213 056 015 


HL 


PFNSEL 


10431 


307 


LAM 




10432 


046 231 036 013 


DE 


d^^:t 


104;36 


106 033 030 


CALL 


cPFm 


10441 


046 2-31 036 013 


DE 


D2PKT 


10445 


106 044 030 


CAI / 


./^NN* 


10450 


104 £66 iT-pR 


O-P 


LPDATE 


10453 


066 213 056 015 


REPLP: HL 


PFNSEL 


10457 


307 


LAM 




10460 


046 ^^5 036 013 


EC 


DIPKT 


10464 


106 033 030 


CALL 


CPFN* 


10467 


046 225 036 013 


DE 


DIPKT 


10473 


106 iZE-2 030 


CALL 


PBCF$ 


10476 


046 241 036 013 


REPFIL; DE 


OfiJPKT 


10502 


106 000 030 


CALL 


SNFR* 


10505 


140 132 021 


JTC 


REPEND 


10510 


306 


LAL 




10511 


024 002 


SU 


il-kBUF 


10513 


066 230 056 013 


HL 


DiPKT-t3 


10517 


370 


LMA 




10520 


046 ^i^5 036 013 


EC 


DIPKT 


10524 


leB 006 030 


CALL 


SfiFW* 


10527 


104 076 021 


JhP 


REPFIL 



WITH FILE MARKER 127 



REWIND DECK 2 



GET THE FILE NME 

SAVE THE CATALOG ENTRV ADDRESS 



CALCU-ATE THE PHYSICAL FILE NUMBER 
SAVE IT 

POSITION TO THE INPUT FILE 

SEE IF THIS IS ThiE LAST ENTRV IN TtEl CATA 



DO SPECIPL LPDfiTE IF IT IS 

POSITIW TO THE END OF THE Ir-PUT FILE 
PUT CUT A FILE fttW-CER AFTER IT 



AND THEN EG THE NORMAL LPDATE 
GET SELECTED FILE NUMBER 

POSITION SYSTEM TAPE TO THAT FILE 



READ AN INPUT RECORD 

CATC^H END OF FILE 
CPLCLLPiTE THE LENGTH 



WRITE THE RECORD 
DO THE NEXT RECO^ 



Pft(^ 16 



22.m CPERfiTim SYSTEM - 0£v 05/71 - MAIN SEC i ION 



H.S.P. 



10532 


006 


040 






REPEND; 


LA 


3£ 


10534 


106 


174 


0£S 






CALL 


Dl.ENW 


10537 


006 


177 








LA 


127 


10541 


106 


174 


023 






UPLL 


DIF.NN 


10544 


104 


054 


0£3 






J^P 


(JPCAT 












'. L^-l FTE A NAMED FIU 


10547 


106 


£55 


013 




DELCMD; 


C«LL 


GET/NiAM 


1055£ 


340 










IFA 




10553 


066 


212 


056 


015 




HL 


ENTSAV 


10557 


370 










Lm 




10560 


106 


£45 


013 






CAi_L 


NCALC 


10563 


066 


213 


056 


015 




.HL 


PFNSEL 


12567 


370 










LMA 




10570 


066 


171 


056 


037 




.HL 


.ALPFN 


10574 


227 










SLiM 




10575 


110 


204 


021 






^FZ 


deldec 


10600 


370 










Lm 




10601 


104 


213 


021 






^M^ 


DELAUT 


10604 


120 


213 


eei 




^ EELDEC; 


^fS 


DEl-AUT 


10607 


307 










LAM 




10610 


024 


001 








SL' 


1 


1061£ 


370 










LMA 




10613 


304 








DELAL'T; 


LAE 




10614 


004 


010 








AD 


ft 


10616 


056 


037 








LH 


CAT>e 


10620 


:360 










LLA 




10621 


:307 










LAM 




irnpp 


074 


040 








CP 




106-4 


150 


275 


021 






JT2 


DEi_AST 


10*6.^7 


074 


052 








CP 


'F ' 


10631 


150 


275 


021 






JT2 


DELAST 


10634 


026 


010 






DELNDV; 


Li.; 


a 


106:36 


106 


345 


037 






CA/_L 


ft K / ^ K 


10641 


307 










i-AM 




10&4-2 


074 


040 








CP 


.- 


10644 


15£j 


254 


021 






JT2 


DFi FND 


10647 


074 


052 








CP 


■ :-K ' 


10651 


110 


£34 


021 






JF2 


DELmC'V 


10654 


;i64 








OELEND; 


LLi- 




10655 


00B 


040 








LA 




10657 


370 










um 




10660 


106 


073 


023 






CfiA- 


PF£CMD 


10663 


046 


£41 


03b 


013 




DE 


uhJPHJ 


10667 


106 


0££ 


030 






CAi ! 


PBOF$ 


10672 


104 


066 


0££ 






JMP 


LPDATE 


10675 


066 


£13 


056 


015 


DELAST: 


HL 


PFNSEL 


10701 


307 










LAf-) 




10702 


024 


001 








^ 


1 


10704 


046 


PPC, 


036 


013 




DE 


DIPKT 


10710 


108 


033 


030 






CALL 


CPFN* 


10713 


046 


pp-S 


036 


013 




J^ 


DIPKT 


10717 


106 


0PP 


030 






CALL 


PBCF* 



FCLUaj ThE FILE Bv FILE MARKERS 
:32 ANU 1£7 



LPDATE THE CATALC-G FiLE 



GET THE NA^€:D FILE 

S.AVE IT 

SAVE THE CATALOG ENTRS-' ADDRESS 

CALCULATE THE PHYSICAL FILE NUMBER 
SAVC IT 

KILL AUTO PTR IF IT IS POINTING 
TO THE FILE TO BE DELETED 



DELETED FILE AFTER AL'TO-POINTED FILE 
ELSE Bi-MP DCWN THE PUTO POINTER 
TO CORRES,P0ND TO CATAL03 SHIFT 

SEE IF Pis ENTRY FOLLCwS 



TAKE SPECIAL fCTICH IF NOT 



SHIFT iXWN THE CATALlG 



DC'f^£" WHEN NO NEXT ENTRY 

OR AT CATALOG STCP ENTRY 
CLEAR THE LAST ENTRY VACATED 
BY THE blCK^E 

PREP THE DATA TfPE 

POSITION FRONT CCCK TO OBJECT FILE 

h^^i ro ThE f-CRMAL LPDATE 
SCROG THE LAST FILE 
POSITION THE SYSTEM TAPE TO THE 
SELECTED FILE MINL'S ONE 



PAGE 17 



£200 CPERATING SVST£>< - QB/fSS/lX - HklH SECTION 



H.S.P. 



10722.- 


046 


225 


0:36 


013 


DE 


DlPhcT 


10726 


106 


017 030 




CALL 


PEOF$ 


10731 


066 


212 


056 


015 


HL 


ENTSAV 


10735 


•367 








i J M 




10736 


056 


037 






LH 


CAT>S 


10740 


006 


040 






LA 


J 


10742 


370 








LMA 




10743 


104 


132 


eE-1 




JfP 
\ LPDPiTE ThE 


REPEND 
SYSTEM TAPE 


10746 


066 


214 


056 


015 


LPDAT0; HL 


PFNCTR 


10752 


307 








LAf-i 




10753 


004 


001 






AD 


1 


10755 


370 








LMA 




10756 


046 


231 


036 


013 


DE 


DRPKT 


10762 


106 


033 


0:30 




CA) f 


CPFN$ 


10765 


046 


231 


0-36 


01:3 


DE 


D2PKT 


10771 


106 


044 


030 




CALL 


TFM^ 


10774 


046 


225 


036 


013 


UPDATl: £€ 


DIPKT 


11000 


106 


000 


030 




CALL 


Sf-FR* 


11003 


140 


030 


022 




JTC 


LPDAT2 


11006 


306 








LAL 




110S7 


024 


iWP 






SU 


TFRBUF 


11011 


066 


234 


056 


013 


HL 


D2PKT+3 


11015 


370 








um 




11016 


046 


2-31 


036 


013 


DE 


D2PKT 


lUTiPP 


106 


006 


030 




CALL 


SBrw$ 


11025 


104 


374 


021 




JhP 


LPDATl 


11030 


046 


225 


036 


013 


UP0AT2: DE 


DIPKT 


11034 


106 


041 


0:30 




CALL 


TFNR* 


11037 


302 








LAC 




11040 


074 


040 






CP 


32 


11042 


160 


346 


021 




JTS 


LPDAT0 


11045 


006 


040 






LA 


32 


11047 


046 


231 


036 


013 


DE 


D2PKT 


11053 


106 


033 


0:30 




CALL 


CPfm 


11056 


046 


231 


0:36 


013 


DE 


D2PKT 


11062 


106 


044 


000 




CAI ; 


Tn-N$ 


110(35 


mi 








RET 




11066 


066 


213 


056 


015 


LpmiE: HL 


PFNSEL 


11072 


307 








LAM 




llid/'-d. 


066 


214 


056 


015 


HL 


PFNCTR 


11077 


370 








LMA 




11100 


asif 


001 






AD 


1 


11102 


046 


PPS 


036 


013 


DE 


DIPKT 


11106 


106 


033 


030 




CALL 


CPFN$ 


mil 


046 


225 


036 


013 


DE 


DIPKT 


11115 


106 


022 


0:30 




CALL 


PBCF* 


11120 


106 


374 


£ei 




CAi ( 


UPDATl 


1 112-3 


046 


241 


03b 


013 


rc 


OB^PKT 


11117 


106 


022 


0:30 




CALL 


PBCF* 



POSITION TO THE END CF ThE FILE 
DELETE ThE ENTRV FROM THE CATALOG 

TER-UNf^TE TAPE PND UPDATE CATALOG 



WRITE THE CURRENT PEN ON OICK TWO 
INCREhENT the: CURRENT PFN 



WRITE IT m DECK 2 

READ A f^CQRD FRCW DECK 1 

CATCH ECr 

Cfl-CLLfiTE ITS LENGTH 

mD PUT IT IN THE H^'ITE PACKET 



WRITE THE RECORD If^/CLUDI.^^G PARITIEi 

DO THE NExT RECORD 

READ FILE I-JOIBER FRC^i DECK 1 



MORE TO GO IF LESS THAN ;32 

ELSE PUT FILE MARKER ;32 Qs EECK 2 



GET TKE SELECTED PHV'SICAL FILE NUMBER 
INITIALIZE THE PFN CC1.'NTER 

POSITia^ TO THE FILE AFTER THE QsE' SELECT 



COPY SYSTEM TAPE TO DATA TAPE 
POSITION DATA TAPE TO ThE OBJECT FILE 



PftGE 


18 








2200 CPERATING SVS JLM 


1113£ 


0PS 


213 


056 


015 


HL 


PFNSEL 


11136 


307 








lam 




11137 


066 


214 


056 


015 


H_ 


Pn-CTft 


11143 


370 








Lm 




11144 


046 


225 


036 


013 


EC 


DIPKT 


11150 


106 


0:33 


030 




Cfil 


CPFN$ 


11153 


046 


PPS 


036 


013 


DE 


DIPKT 


11157 


106 


02£> 


030 




CA/( 


PBCf* 


11162 


104 


174 


022 




Jl-P 


LPDAT4 


11165 


046 


PPC, 


036 


013 


LPDAT3.' DE 


DIPKT 


11171 


106 


044 


030 




CWLL 


TF^W$ 


11174 


046 


231 


036 


013 


LPDAT4.' DE 


CePKT 


11200 


106 


000 


030 




CALL 


SNTR* 


11203 


140 


2:30 


022 




JTC 


UPDAT6 


1120b 


306 








LAL 




11207 


024 


002 






SU 


TFRBLF 


11211 


066 


230 


056 


013 


H_ 


DlPKT+3 


11215 


370 








Lm 




11216 


046 


PPC, 


036 


013 


DE 


D1PH.T 


11222 


106 


006 


030 




CALL 


SBFm 


11225 


104 


174 


022 




^*-P 


LPDAT4 


11230 


066 


214 


056 


015 


UPDAT6: ,HL 


PFNCTR 


11234 


:307 








LAM 




11235 


004 


001 






AD 


1 


11237 


370 








LMA 




11240 


046 


Pp5 


036 


013 


DE 


DiR<T 


11244 


106 


033 


030 




CrtLL 


CPFm 


11247 


046 


2-31 


036 


013 


CiE 


D2PKT 


112^.3 


106 


041 


030 




CALL 


TFm$ 


11256 


:30£ 








LAC 




11257 


074 


040 






CP 


32 


11261 


160 


165 


022 




JTS 


LPDAT3 


11264 


104 


132 


021 




^tP 


REPE.ND 



LCAD i-i-iD Execute a file 



11267 


106 


316 


013 


Ri-I^CN©.- CAi 1 


lCTSVM 


11272 


074 


052 




CP 


•;;;" 


11274 


150 


311 


i7^'P 


JT2 


RL^DBJ 


11277 


106 


260 


013 


CAi ) 


GLJNAN 


11302 


106 


245 


013 


CALL 


.NIJALC 


11-305 


310 






LBA 




11:306 


104 


201 


037 


J^1P 


MAUTO* 


11:311 


066 


172 




RUCa.J; LL 


SYMBOL 


1131:3 


:307 






LAM 




11314 


074 


040 




CP 


•• •' 


11316 


110 


2:37 


012 


Jt-y 


BADNAM 


11321 


046 


241 


036 013 


DE 


OBJPKT 


1132S 


106 


022 


030 


CAI / 


PBQF* 


11330 


046 


231 


036 013 


DE 


D2PKT 


11:3:34 


106 


025 


0:30 


CALL 


BSP$ 


11337 


016 


001 




LB 


1 


11341 


104 


212 


037 


J^P 


h»^'T2* 



5/71 - MAIN SECTION H.S.P. 

RE- INITIALIZE THE FILE CC-LNTER 

POSITION DECK 1 TO SELECTED FILE 

WRITE A FILE NLHBER ON EECK 1 
READ A f^CCfiD FROM DECK 2 

catch eof 

calcllate it-s length 

put it in tl^ write packet 

write the file 

includi;ng the PARITV charac;ters 

DO THE NExT RECORD 

INCREMENT THE CURRENT PFN COUNTER 

CHANGE THE PACKET NIWBER 

READ THE NExT FILE hlPBER FROM DECK 2 



DO THE NEXT FILE IF IT IS LESS THAN 32 
ELSE TERMINATE TAPE AND UPDATE CATALOG 



GET THE FILE Nf^E 
LOAD 0&_iECT FILE IF * 

ELSE LOOK LP NA^-E 
CALCULATE THE PFN 
RLN IT 

MAKE SLPE THERE 

WAS ^D ,f-*¥-C BESIDES * 



POSITIOr^ THE FILE FOR THE LOADER 



RUN THE OBJECT FILE 
ON THE FRONT DECK 
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2200 OPERATING SYSTEM - ee/05/71 - ^*^IN SECTIW 



H.S.P. 



SET THE AL'TO-LQAD POINTER 



11344 


066 


171 


056 037 


AL'TCMD; 


HL 


ALPFN ! 


11350 


307 








LAM 




11351 


260 








CRA 




11352 


110 


377 


02^ 




JFZ 


AUTDLP i 


11355 


106 


255 


013 




CALL 


GETNAM 1 


11360 


024 


010 






SU 


CAT t 


11362 


012 








SRC 




11363 


012 








SRC 




11:364 


012 








SRC 




11365 


004 


002 






AD 


£" 


11367 


mF, 


171 


056 037 




H_ 


ALPFN ( 


11373 


370 








LMA 




11374 


104 


054 


023 




JNP 


LPCAT / 


11377 


0£4 


002 




AUTDLP; 


SU 


2 I 


11401 


see 








SLC 




11402 


002 








SLC 




11403 


002 








SLC 




11404 


004 


010 






AD 


CAT 


11406 


360 








LLA 




11407 


056 


037 






LH 


CAT>8 


11411 


046 


157 


0:36 013 




lx: 


AUTENT 


11415 


026 


006 






LC 


6 


11417 


106 


345 


037 




CALL 


BLKTFR i 


11422 


FiPP. 


143 


056 013 




H_ 


ftUTMS'3 


11426 


im 


270 012 




J^P 


BADSPL / 










! RESET 


ThE AL'TO-LOAD POINfLR 


11431 


066 


171 


056 037 


f-ftCMD; 


HL 


ALPFN 


11435 


307 








LAM 




11436 


260 








CRA 




11437 


066 


126 


056 013 




HL 


NQAMSG 


11443 


150 


270 


012 




jtz 


BADSPL f 


11446 


066 


171 


056 037 




H_ 


ALPFN 


11452 


>Si3 








xRA 




11453 


370 








LMA 












, LPDATE THE 


CATALOG FILE 


11454 


046 


235 


036 013 


LPCAT; 


DE 


catpak; 


11460 


106 


022 


030 




CALL 


PBC'F* 


11463 


046 


235 


036 013 




DE 


CATPAK 


11467 


106 


011 


0:30 




CALL 


SNFW* 


11472 


007 








RET 












'. PREPARE A Blank: data tape 


11473 


FeF, 


166 


056 013 


PRECMD; 


HL 


CBTMSG J 


11477 


106 


151 


0:36 




CALL 


DSPLV* 


115£e 


151 








Ex 


BLLP 


11503 


377 








H^T 




11504 


046 


231 


036 013 




DE 


D2PKT f 



(3ET THE POINTER 



ERROR IF ALREADV SET 
ELSE GET THE .NAME 
CALCAi_ATE THE FILE NUMBER 



AND SET THE POINTER 

AND UPDATE THE CATALOG FILE 
CALCULATE TABLE ADDRESS 



PUT TABLE ENTRy IN STRIHj 
AND PRINT IT 



AUTO IS NOT SET 



WAIT FCR BLANK TAPE 



REWIND THE DATA TAPE 



page: £0 



£200 OPERATING SYSTEM - ^e/gB-^?! - WIN SECTION 



H.S.P. 



Ii510 
11513 
11517 
11521 
11524 
11530 
11533 
11537 
11541 
11544 
11550 
11553 
11555 
11561 
11564 
11570 
11573 



11574 
11600 
11603 
11607 
11612 



11613 
11614 
11615 
11616 
11617 
11621 
11624 
11625 
il62e 
11627 
11631 
11632 
11633 
11635 
11636 
11637 
11642 
11643 
11644 
11647 



106 
046 
006 
106 
046 
106 
046 
006 
106 
046 
106 

006 

046 
106 
046 
106 
007 



036 
£•31 

000 

033 
£31 
044 
231 

001 

033 
231 
044 
177 

231 
033 

231 
044 



030 
036 013 

030 

036 013 
030 
036 013 

030 

036 013 
030 

036 013 
030 

036 013 
030 



046 225 036 013 
106 033 030 
046 £25 036 013 
106 044 030 
007 



163 
317 
123 

101 

044 010 

150 215 023 

301 

127 

:306 

004 001 

360 

305 

014 000 

350 

273 

110 214 023 

■o;06 

£74 

110 214 023 

007 



CALL 

LA 

CALL 

DE 

CALL 

DE 

LA 



TRW$ 

CePKT 



CPFN* 

DePKT 

TFNN* 

D£PK:T 

1 



CALL CPFN$ 
£E D2PKT 



CALL 

LA 

DE 

CALL 

DE 

CALL 

RET 



Trw$ 

127 

D2PKT 
CPFN* 
nePKT 
TFNW* 



WRITE A FILE NLMBER ON IT 



WRITE A FILE NLMBER 1 ON IT 



WRITE A FILE f^LMBER 127 ON IT 



, )-«ITE A FILE MARKER ON DECK 1 

DIFM-J; DE DiR<T 

CALL CPFN$ 

DE DIPKT 

CALL TFNW* 
RET 



WRITE A BLOCK TO TAPE 
WBK 
STATUS 



wblqk; 

HNEXT 
W-#^IT 



Ex 

LSM 

LX 

IN 

ND 

JT2 

LAB 

Ex 

LAL 

AD 

LLA 

LAH 

AC; 

LHA 

CPD 

J^2 

LAL 

CPE 

JFZ 

RET 



010 

WRITE 
1 



J-f-ExT 



FIRE LP THE WRITE 

GET THE DATA CHARACTER 

WAIT FCiR WRITE READV 



WRITE THE DATA CHARACTER 
BJh-P THE ^CMORV POINTER 



SEE IF AT END CF BLOCK VET 
NO CHmCE 



WNExT 



11650 106 300 017 
11653 046 £31 036 013 
11657 106 036 030 



TRY LSB 

ELSE WE ARE DONE 

* 

'. PUT Pi TSB tape INTO THE LIBRARY 

HExCMD: CALL INGET DO ThE PART THAT IS LIKE INCMD 

DE D2PKT 
UALL TRW* 
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£200 CPEmilNG SV3TEM - 0£/05/71 - MAIN SECTION 



H.S.P, 



1166£ 
0.1665 
11667 
11670 
11672 

11675 
11677 
1170£' 
11705 
11706 
11711 
11714 
11716 
11717 
117£l 

117££ 
11725 
11727 
11730 
11732 
11735 
11737 
11740 
11742 
11745 
11747 
11752 
11754 
11757 
11761 
11762 
11764 
11767 
11772 
11773 
11774 
11775 
11776 
11777 
12001 
1£00£ 
12003 
12006 
12007 
12011 
12014 
12016 
1£0£1 
12023 
12024 
1£0£7 
12031 



10b 157 024 
066 007 
:307 

074 053 
110 262 0£3 

066 010 
106 256 024 
140 123 024 
321 

lee 

140 



256 024 
123 024 



066 004 
372 

066 005 
371 



106 
066 
307 
074 
110 
066 
307 
074 
150 
074 
150 
074 
150 
066 
347 
066 
106 
140 
306 
364 
340 
371 
306 
004 
364 
340 
104 
307 
074 
150 
074 
110 
066 
374 
104 
066 
036 



157 0£4 
006 

012 

123 024 
007 

052 

322 023 
053 

275 023 
043 

132 021 
114 

007 

£56 024 
006 024 



001 



364 0£a 

023 

027 024 
053 

123 0£4 
114 

322 023 

114 

123 



t^xREC: 



HEXASR; CALL 
LL 
LAH 
CP 
^F2 

HEXGfiD: LL 

CALL 

JTC 

LCB 

CALL 

JTC 

LL 

UiC 

LL 

LMB 

CALL 

LL 

LAM 

CP 

JFZ 

LL 

LAM 

CP 

JT2 

CP 

JTZ 

CP 

JTZ 

LL 

L£M 

LL 

CALL 

JTC 

LAL 

LLE 

LEA 

U-B 

LAL 

Ai-J 

LLE 

LEA 

Jf-P 

LAM 

CP 

JTZ 

CP 

JFZ 

LL 

LME 

Jh-P 

LL 

Lti 



hExCL; 



HExEC; 



i-ExRBK 
/-txBLF+i 

• + ■■ 
HExASR 

HExSUF+2 

HExCON 

HExERR 

HEXCQN 
HExERR 
HExADR 

HExAr»^+l 



HExRBK 
HEXSbF 

012 

HExERR 

HtxEUF+l 



HEXREC 
•■ + •■ 

HEX(3AD 
' ## ' 

f^pasD 

HExhBP 

HExBUF+l 

HExCC^ 

HEXEC 



HLxWRT: 



HEXCL 

023 

hEXM^T 
•t ■■ 

HExERR 
WIXWBP 

HEXREC 
HExWBP 
HExWBr+4 



SEARCH rm THE FIRST STARTING ADDRESS 



THE FIRST CHARACTER MUST BE A + 



C€:T the STARTING ADDRESS 

IT ^iUST BE FC-UR GOOD HEX CHARACTERS 
SAVE MSB 



SAVE THE PiDiy^SS 



LOAD A RECORD 

GET THE FIRST ChARAC'TER 

IT M.*ST BE A LINE FEED 

GET THE -SECOND CmRACTER 

IG^C'RE RECORD IF * 

GET PiDEf^SS IF + 

END CF FILE IF # 

COhh/ERT THE HEx IN HExBOF 
TO BINARV IN HEXHBF 



QUIT IF NCH-HEX CHARACTER 
SNAP E Pd€) L 



STORE BIf*tf^' NUf-fBER 
INCREMENT AND SHfP L Af-JD E 



DO NEXT HEX PAIR 
TERMIiNATINiG CHAR t-VST BE 023 



LN_£SS THIS BLOCK IS TO BE CONTINLETD 

IN WHICH CASE. JLBT LPDATE 
THE WRITE BLFFER POINTER 

ELSE RESET THE WRITE BUFFER PTR 
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££00 CPERPiTING SV3TEM - 0£/05/71 - MAIN SECTION 



H.S.P, 



1£03S 


373 






LMD 




12034 


066 


004 




U_ 


HExADR 


izase 


307 






LAM 




12037 


066 


117 




LL 


HExWBF 


i2m% 


370 






L>« 




12042 


054 


377 




XR 


0377 


12044 


066 


1£1 




LL 


HE:KWBr+£ 


12046 


370 






LMA 




12047 


(Tf'P. 


00B 




U- 


HEXADR+1 


1£051 


■307 






LAM 




l>i?-FP 


066 


1£0 




LL 


HExi-ar+1 


12054 


370 






LMA 




1££;55 


054 


377 




XR 


0377 


'120b/ 


066 


1££ 




LL 


HExWBr+3 


1£061 


370 






LMA 




12062 


;304 






LAE 




12063 


0£4 


1£3 




SU 


HExWBF+4 


1£«6S 


340 






LEA 




1£0S6 


0/36 


005 




LL 


HE;<ADR+1 


12070 


307 






LAM 




12071 


£04 






ADE 




1207-2 


370 






Lm 




1207-3 


066 


004 




LL 


HExADR 


l£fei/b 


307 






LAM 




1£076 


014 


000 




AC 





I£li2i0 


370 






Lm 




12101 


:304 






LAE 




1£10£ 


) 004 


004 




AD 


4 


12104 


066 


003 


056 0£5 


HL 


HEXPKT+3 


1£110 


370 






Lm 




1£111 


046 


000 


036 0£5 


£E 


HExPKT 


1£115 


106 


011 


03i5 


CALL 


SlNf>($ 


1£1£0 


104 


3PP 


0£3 


JfiP 


HExREC 


1£1£S 


106 


146 


0£4 


HExERR: CALL 


DJ-WIT 


1£1£6 


167 






EX 


BSP 


1£1£7 


108 


146 


0£4 


CALL 


U-^.U 


1£13£ 


iWi6 


;341 




LA 


0341 


1£134 


1£1 






EX 


ADR 


1£135 


101 






m 




1£136 


044 


004 




N\j 


4 


12140 


150 


3££ 


0£3 


JT2 


hEXF^C 


1£143 


104 


13£ 


0£1 


^^■IP 


REPEND 


1£146 


0£6 


001 




Q-JAIT; LC 


1 


l£a50 


1£3 






B-JAIT; EX 


STATUS 


1£151 


101 






IN 




1£15£ 


£4£ 






NDC- 




1£153 


150 


150 


0£4 


JT2 


TWAIT 


1£156 


007 






f^T 




1£157 


SmS6 


:360 




HEXRBK; LA 


0360 


1£161 


121 






EX 


ADR 


1£16£ 


106 


146 


0£4 


CALL 


DhWiT 



PUT THE STARTING ADDRESS IN BUFFER 



CALCULATE THE CC'RE BLOCK LENGTH 



UPDATE THE CORE ADDRESS 



CALCLI_ATE THE WRITE BLCCK LENGTH 
COMPENSATE FOR HL GIVEN THICE 
PUT THE' LENGTH IN ThS: PACKET 

WRITE THE SUFFER 

.AND DO THE /nEXT RECORD 

TRV THAT RECORD AGAIN 

UNLESS KEYBOARD SWITCH DEPRES3£:D 



DECK HPiIT LOOP 



Mh*<:E SURE THE CASSETTE IS ADDRESSED 
READ A BLOCK 
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1 r-r-«_ 

1£165 


157 




C-t-tflt/ '-'7^ 


Ex 


DECK2 


1E166 


106 


146 024 




CALL 


DHAIT 


1£171 


066 


006 056 025 




HL 


HExBLF 


12175 


161 






Ex 


RBK 


12176 


026 


££4 


HExRf^; 


LC 


024 


122eEi 


106 


150 024 




CALL 


TWAIT 


12203 


044 


ee0 




ND 


020 


1PPIF& 


110 


146 0£h 




JF2 


DHAIT 


1PP10 


125 






Ex 


DATA 


12211 


101 






IN 




1^212 


044 


XT? 




ND 


0177 


12214 


370 






LW 




12215 


306 






LAL 




12216 


004 


001 




AD 


1 


122213 


:380 






1 i A 




IPPPl 


104 


176 024 




.>P 


HEXRNx 


1PPP4 


024 


060 


HEXGET; 


SU 


••0-- 


1PPP6 


160 


252 024 




JTS 


HExCEN 


12^31 


074 


012 




CP 


10 


1 s>P33 


160 


pC^tTi 0P4 




JTS 


HExLCW 


12236 


ee4 


007 




SU 


7 


12240 


160 


252 024 




JTS 


HEXCE^J 


12243 


074 


020 




CP 


16 


12245 


120 


^52 024 




JTS 


HEXCEN 


12250 


260 




HExLOW: 


CftA 




12251 


007 






RET 




12252 


064 


001 


HExCEN; 


CR 


1 


12254 


012 






SRC 




12255 


007 






RET 




l^^;^*:^ 


307 




HExCQN; 


LA^J 




12257 


106 


224 024 




CALL 


HExGET 


IPPfiP 


043 






RTC 




12263 


012 






SRC 




li=*i^64 


012 






SRC 




12265 


012 






SRC 




12266 


012 






SRC 




12267 


310 






LBA 




rpp70 


306 






LAL 




12271 


004 


001 




AD 


1 


iPP73 


360 






LLA 




12274 


307 






LAM 




12275 


106 


224 024 




CALL 


HExC^T 


12300 


043 






RTC 




12301 


261 






ORB 




i23ee 


310 






LBA 




12303 


306 






LAL 




12304 


004 


001 




AD 


1 


12306 


360 






1 1 A 




12307 


007 






RET 


^ 



2200 OPERATING SYSTEM - 0^/05/71 - /^IN SECTION 

FROM DECK 2 
INTO HElxWF 
WAIT FOR IRG OR DATA 

QUIT IF IRG 

ELSE PUT DATA INTO BUFFER 

STRIP THE PARI TV 

BUMP THE /-EMCRV POINTER 



CCM»/ERT HEX TO 4-BIT BINARV 



H.S.P. 



CLEAR THE CARRV TIGGLE 
SET THE CARRV TIGGLE 



GET THE FIRST CHAf¥^;TER 
CONVERT IT TO BINARV' 
QUIT IF NOT HEX 
PUT IT IN LEFT HALF OF SVTE 



SAVE IT 

BL^P THE ^£M3RV POINTER 



GET THE SECOND Chi^fCTET^ 
COVERT IT TO BINf^iRv' 
QUIT IF NOT HEX 
MERGE THE Tl^ HALVES 
LEAVC RESLI.T IN fi REGISTER 
BUMP THE /'EMORV POINTER AGAIN 



12400 



TP 



Pf*^ £H 



■2£.m CPERftTm3 SVSTEM - 0£/05/71 - MAIN SECTION 



H.i 



1-2400 


001 


HExPKJ: 


DC- 


1 


12401 


117 025 




DA 


HExWBF 


12403 


000 




DC 





l£-40i+ 


000 m0 


HExADR; 


DA 





12406 




HEXBJ^: 


SKIP 


70 


1£514 


1£3 


HExHBP: 


DC 


HExWBF+4 


1£'515 


000 000 




DC 


0.0 


12517 


m0 000 000 000 


HExWBFf 


DC 


0.0.0.0 


'[?'^3 






SKIP 


128 


1272:3 




^E>*©E.• 


EQU 


$ 


13000 




' 


SET 


013000 


13000 




SOOTS; 


SKIP 


01000 


14000 




BOOTE; 


EOU 


« 



C-UTPUT FILE IS LOGICAL FILE ONE! 
WRITE FROM WRITE BUFFER 

CLRRENT CORE ADDRESS 

WRITE BLFFER POINTER 
ROC'M FOR Pf^f^ITV CHECKS 
ROOM FOR H AND L 
ROOM FOR THE DATA 



ROOM FOR THE BOOT BLOCK 



DONE 
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£200 OPERATING SVSTEM - (22/05/71 - FILE HPNDLim ROUTINES 



H.S.P, 



14000 



SET 014002 
tPERATING SVSTE>1 ROUTINE ENTRV POINT TABLE 



14000 


104 


i25£ 


030 


SNFR** 


Jt-P 


SNFRx 


14003 


104 


£30 


030 


SSFR*;^- 


JMP 


SSFRx 


14006 


104 


376 


030 


SBFW$^J 


J^ 


sbf;-*< 


14011 


104 


005 


031 


SNFW$;!; 


J^P 


SNFI-Jx 


14014 


104 


072 


031 


SSFHm- 


JMP 


SSFH>< 


14017 


104 


■3fV. 


031 


PEO^S'.f 


^t-P 


PEcrx 


I4ee2 


104 


375 


031 


PBOF$* 


JMP 


PBOFx 


14025 


104 


004 


032 


bSP$-^- 


JhP 


BSPx 


14030 


104 


016 


032 


cpm$it^ 


JMP 


CPDNiK 


140-35 


104 


030 


032 


CPFN$* 


JMP 


CPFNX 


14036 


104 


0/b 


034 


TRW«i^ 


JMP 


TR(^ 


14041 


104 


114 


034 


)i-NR$* 


J^F 


TFNR;< 


14044 


104 


1£7 


034 


J/-NH** 


JMP 


ItM-ix 


14047 


104 


104 


032 


ERR** 


J^•p 


ERR-X 










. SERIAL NU'CRIC FILi 


1405£ 


106 


355 


031 


SNFRx.' 


CALL 


RTCI 


14055 


106 


15£ 


032 


SNFRS: 


CALL 


GLiPKT 


14060 


106 


027 


033 




CALL 


RSK$ 


14063 


106 


363 


032 




CALL 


READ* 


14066 


330 








LDA 




44067 


106 


36:3 


032 




CALL 


READ* 


1407£ 


054 


377 






xR 


0377 


14074 


£73 








CPD 




14075 


110 


£17 


030 




JF2 


SNFRR 


14100 


074 


£01 






CP 


0201 


14102 


150 


062 


032 




JT2 


FEACT 


14105 


074 


347 






CP 


0347 


14107 


150 


074 


032 




JTZ 


TEACT 


14112 


074 


303 






CP 


0503 


14114 


110 


217 


030 




■ JF2 


SNFRR 


14117 


106 


36:3 


032 




CALL 


READ* 


1412£ 


330 








LTO 




141£3 


370 








LHA 




141£4 


306 








LAL 




141£5 


004 


001 






AD 


1 


141£7 


360 








1 i A 




14130 


305 








LAH 




14131 


014 


000 






AC 





14133 


350 








LHA 




14134 


106 


363 


032 




CALL 


READ* 


14137 


140 


217 


030 




JTC 


SNFRR 


1414£ 


340 








LEA 




14143 


370 








LMA 




14144 


306 








LAL 




14145 


004 


001 






AD 


1 


14147 


360 








i i A 





INITIALIZE TFE RE-TRV COUNT 

(3ET ThE Pf^KET PARAMETERS 

START READING THE RECCiRD 

GET THE RECC-RD TVPE 

SAVC IT 

(^T THE RECORD TVPE CCM=>LEMENTED 

UN-CC-MPLEMENT IT 

MAKE SLRE THEV MATCH 

TRV AGAIN IF ThEV DON'-'T 

SEE IF IT IS A FILE MARKER 

QUIT IF IT IS 

SEE IF IT IS A SV'MBOLIC RECORD 

TVPE ERRCR IF IT IS 

MAKE SLRE IT IS A NUMERIC RECORD 

GET THE PARI TV CHECKS 

STORE PARI TV IN FIRST BVTE CF BUFFER 



TRV AGAIN IF RECCRD OVER ALREADV 
STOra: PARI TV IN SECOND BVTE OF BUFFER 
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££'00 <")PERATING SYSTEM - 0e/£i5./71 - FILE 1-fHFl.ING ROUTINES 



H.S.P. 



14150 


305 




LAH 




14151 


014 


000 


ftC 





14153 


350 




LHA 




14154 


106 


363 032 


ShfRLi CALL 


READ* 


14157 


140 


205 030 


JTC 


SNFRC 


1416£ 


370 




LMA 




14163 


320 




LCA 




14164 


253 




xRD 




14165 


330 




LDA 




14166 


;^7p 




LAC 




14167 


254 




XiK£ 




14170 


012 




SRC 




14174 


;340 




LEA 




14172 


•306 




LAL 




14173 


004 


001 


AD 


1 ■ 


14175 


360 




LLA 




14176 


305 




LAH 




14177 


014 


000 


AC 





14201 


350 




LHA 




14202 


104 


154 030 


JMP 


SNFFL 


14225 


303 




SNTRE; LAD 




14206 


264 




ORE 




14207 


110 


217 030 


^2 


SNFFR 


14212 


106 


016 033 


CALL 


WAIT* 


14215 


250 




xRA 




14216 


007 




RET 




14217 


106 


324 031 


SNFRR: CALL 


CeCRTC 


l^ppp 


120 055 030 


JFS 


SNFRS 


14PP'=. 


104 


102 032 


J^p 


REACT 








'. SERIAL SVMBOL IC FIl 


14230 


106 


355 031 


SSFRx'; CALL 


RTCl 


14233 


106 


152 032 


SSFRS: CALL 


GLIPKT 


14236 


106 


0£7 033 


CALL 


RBK$ 


14241 


106 


363 032 


CALL 


READ* 


14244 


330 




LDA 




14245 


106 


363 032 


CALL 


READ* 


14250 


054 


377 


xR 


0377 


14PSR 


273 




CPD 




14253 


110 


365 030 


JFZ 


SSFRR 


14256 


074 


201 


CP 


0201 


14260 


150 


062 032 


JT2 


FEftCT 


14263 


074 


303 


CP 


0303 


14265 


150 


074 032 


JTZ 


TEACT 


14270 


074 


■347 


CP 


0347 


1427E 


110 


365 030 


JFZ 


SSFRR 


14275 


106 


•363 032 


CfL.L 


READ* 


14300 


330 




LDA 




14301 


106 


363 I7icv> 


CALL 


READ* 


14304 


340 




LFA 




14305 


140 


■365 030 


JTC 


SSFRR 


14310 


106 


363 ms 


SSFRL; CALL 


READ* 


14313 


140 


350 030 


JTC 


SSFRE 



READ ThE REST CF THE RECORD 
QL'IT IT AT END OF RECXjRD 
STORE THF BYTE OF DATA 
SAVE IT 
ACC^LWLLATE THE PARITIES 



BLMP THE MEHjRV POINTER 



DO THE NExT SVTE 

CHECK THE P(V^ITV TOTALS 

TRV AGAIN IF THEV ARENT BOTH ZERO 

ELSE WAIT FOR THE OPERATION TO BE ca-iPLET 

CLEAR THE CARRV TIGOLE 

AND RETLF3N 

BACK LP AND TRV AGAIN 

UNLESS RTC IS NEC^TIVE 

TN WHICH CASE. PmiTV ERROR Ex IT 



INITIALIZE THE RE-TRV COUNT 

GET RACKET Pf^Vif^^ETERS 

START THE READ 

GET ThE RECORD TVPE 

SAVE IT 

GET ThE RECORD TYPE COMPLIMENTED 

UN-COHR_E^£NT IT 

THEV MUST MftTCH 

QUIT IF IT IS (^ EOF RECORD 

TVPE ERROR IF IT IS A NUMERIC RECORD 

MAKE SURE IT IS A SYMBOLIC RECORD 

INITIALIZE THE PARITY ACCUMULATORS 



TRi' AGAIN IF THE RECORD IS OVER ALREADV 
READ THE REST OF THE RECORD 
QUIT IF THE RECORD IS O-JDED 



PAC3E: 


27 






14316 


260 






14317 


130 


365 


030 


143£S 


320 






14;^3 


044 


177 




14;^iP=^ 


370 






143£6 


302 






14327 


253 






1433)2 


330 






14331 


•see 






14;^^ 


254 






14333 


012 






14334 


340 






14335 


(WiF, 






14336 


0m 


001 




14340 


360 






14341 


325 






1434£ 


014 


000 




14344 


350 






14345 


104 


310 


030 


14350 


006 


015 




143SP 


370 






14353 


303 






14354 


264 






14355 


110 


365 


030 


14;V50 


106 


016 


033 


14;Sfi3 


250 






14364 


007 






14365 


106 


324 


031 


14370 


120 


e33 


030 


14373 


104 


102 


032 


14376 


106 


152 


032 


14401 


342 






1440S 


104 


£26 


031 


14405 


106 


152 


032 


14410 


106 


277 


032 


14413 


036 


000 




14415 


046 


000 




14417 


307 






14420 


106 


213 


031 


14423 


110 


017 031 


14426 


106 


034 


033 


14431 


036 


303 




14433 


im 


cm> 


033 


14436 


036 


074 




14440 


106 


002 


033 


14443 


337 






14444 
14447 


106 
306 


002 


033 



2200 OPERATING SVSTEM - 02/05/71 - FILE HfMX-ING ROUTINES 



H.S.P. 



ORA 

JFP 

LCA 

ND 

UlA 

LAC 

xRD 

LDA 

LAC 

xre: 

SRC 

LEA 

LAL 

AD 

LLA 

LAH 

AC 

LHA 

JMP 

S^f^: LA 
LMA 
LAD 
ORE 
JF2 
CALL 
xRA 
RET 

SSFRR; CALL 
JFS 
JMP 



SSFFa? 
0177 





SSFRL 
015 



SSFf^ 
WAIT* 



DECRTC 

SSFRS 
PEfiCT 



, SERIAL BLOCK FILE WRITE 

SBFWx; CALL GETPKT 
LEC 
JMP SfiFWE 

'. SERIAL NUMERIC FILE hRlTE 



SNFWx'; CALL 
CALL 
LD 
LE 

SNFWPG; LAM 
CALL 
J^Z 
CALL 
LD 
CALL 
LD 
CALL 
LDM 
CALL 
LAL 



SBFWEr 



5NFWL,' 



GETPKT 

SAVHL 





PARGEN 

NBK$ 

0303 

WRITE* 

074 

WRITE* 

WRITE* 



CHECK THE VERTICAL PARI TV 
TRV- AGAIN IF IT IS FALSE 
SAVE THE BYTE 
STRIP THE ^CRTICAL PARI TV 
STOF^ THE BVTE 
ACCUMULATE THE PARITIES 



BUMP THE MEMORV POI^T^ER 



DO THE NEXT CHARACTER 
TERMINATE STRING WITH AN 015 

C^-ECK THE PARI TV SUMS 

TRV AGAIN IF BOTH ARENT ZERO 

ELSE 1^1 T FOR THE CPERATION TO COMPLETE 

CLEAR THE CARRV TCGGLE 

AND RETLRN 

BACK UP AND TRV AGAIN 

LM-ESS RTC IS NEGATIVE 

IN WHICH CASE- PARI TV ERROR EXIT 



PUT THE LENGTH IN THE E REGISTER 



(SET THE PACKET PARAMETERS 

SAVE ThE BUFFER STARTING ADDRESS 

INITIALIZE THE PARI TV ACCL^ftJLATQRS 

GENERATE THE PfiRITV TOTALS 



START LP THE WRITE 

WRITE OUT RECmD TYPE t-UMERIC 

WRITE OUT ITS COMPLEMENT 

WRITE CDT THE REST OF THE RECORD 

BUMP THE MEMORV POINTER 



Pf¥:x: £8 



2200 OPERATING SYSTEM - SB/05/71 - FILE H^^vELING ROUTINEi 



H.S.P. 



14450 


004 001 






AD 


1 


14452 


;Sfi0 






/ 1 A 




14453 


305 






LAH 




14454 


014 000 






AC 





14456 


350 






LHA 




14457 


304 






LAE 




14460 


024 001 






SU 


1 


14462 


340 






LEA 




14463 


110 043 


031 




JFZ 


SNFWL 


14466 


106 016 


033 




CALL 


HftIT$ 


14471 


007 






RET 










. SERIAL SVMBOLIC FIl 


14472 


106 152 


032 


SSFWk'; 


CALL 


GL/PKT 


14475 


106 277 


032 




CALL 


SAVHL 


14500 


036 000 






LD 





14502 


046 000 






LE 





14504 


307 




SSFhPGi 


Lm 




14505 


074 015 






CP 


015 


14507 


150 131 


031 




JTZ 


ssn-ps 


14512 


260 






QRA 




14513 


172 120 031 




JTP 


SSFWPT 


14516 


054 200 






XR 


ppm 


14520 


370 




SSFWPT: 


LMA 




14521 


££6 0RR 






LC 


2 


14523 


106 213 


031 




CALL 


PARGEN 


14526 


104 104 


031 




JMP 


SSFWPG 


14531 


106 232 


031 


SSFWPSr 


CALL 


PARSTO 


14534 


106 034 


033 




CALL 


WBK* 


14537 


036 347 






LD 


0347 


14541 


106 002 


033 




CALL 


WRITE* 


14544 


036 030 






LD 


030 


14546 


106 aee 


033 




CALL 


WRITE* 


14551 


046 tm> 






LE 


2 


14553 


304 




.SSFHL; 


LAE 




14554 


ee4 001 






SU 


1 


14556 


340 






LEA 




14557 


307 






LAM 




14560 


120 174 


031 




JFS 


SSFWW 


1458;^ 


074 015 






CP 


015 


145B5 


110 174 


031 




JFZ 


SSFWW 


14570 


106 016 


033 




CfU- 


WAIT* 


14573 


007 






RET 




14574 


330 




SSFHN'; 


LDA 




14575 


106 eUFP. 


033 




CALL 


WRITE* 


146fS0 


306 






LAL 




14601 


004 001 






AD 


1 


14603 


360 






LLA 




14604 


305 






LAH 




14605 


014 PilFi0 






AC 





14607 


350 






LHA 




14610 


104 153 


031 




JMP 


SSFWL 



DECREMENT THE BUFFER LENGTH COUNT 



WAIT FCfi THE OPERfiTION TO BE COMPLETE 



<3ET THE PACKET PARAMETERS 

SAVE THE START CF BLFFER ADDRESS 

INITIALIZE TtC PARITY ACCUMULATORS 

CCNERATE THE PARITY TOTALS 
ChCCK FOR END OF BLFFER 

GENERATE THE VCRTICAL PARITY BIT 



WRITE OUT CORRECTLY PARITIED CHfiiR 
FAKE OUT PARi^N LENGTH CC-UNTER 



START UP THE WRITE 

PUT OJT RECORD TYPE SYMBOLIC 

PUT OUT THE TYPE COMPLEI^NTED 

DONT CHECK FOR 015 IN 1ST TWO PARITY BYTE 

DECREMENT FUDGE COUNTER 

GET CHARACTER FROM BUFFER 

EREG NOT NEG SO DONT CheiCK FOR 015 

CHECK FOR END OF STRING 

NOT END OF STRING SO WRITE IT OUT 

ITS A 015 SO END OF STRING 

SO RETURN. 

WRITE THE BUFFERED CHARACTER 

BUMP THE MEMORY- POINTER 



DO THE NEXT CHARACTER 
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H.S.P. 



14613 


310 






PfiRGEN: 


LBA 




14614 


253 








xRD 




14615 


330 








LDA 




14616 


301 








LAB 




14617 


254 








xre: 




146£0 


012 








SRC 




146£1 


340 








/ FA 




mpp^ 


106 353 


036 






CALL 


INCHL 


x^ep^ 


■sep 








LAC 




146£6 


0£ij 001 








SU 


1 


14630 


SPPi 








LCft 




14631 


013 








RF2 




14632 


306 






Pf^STO: 


LAL 




14633 


066 333 


056 


03£ 




HL 


HLSAV+1 


14637 


££7 








SUM 




14640 


044 037 








ND 


7 


1464£ 


320 








LCA 




14643 


302 






PSLOOP: 


LAC 




14644 


024 001 








SU 


1 


14646 


320 








LCA 




14647 


160 £60 031 






JTS 


PSTORE 


1465£ 


304 








LAE 




14653 


00R 








SLC 




14654 


340 








1 FA 




14655 


104 £43 


031 






JMP 


P^OCP 


14660 


106 316 


03£ 




PSTORE; 


CALL 


RESHL 


14663 


106 364 


036 






CALL 


DECHL 


14666 


374 








U« 




14667 


106 364 


036 






CALL 


DECHL 


1467^ 


373 








LMD 




14673 


066 P54 


056 


03£ 




H_ 


PKTACR 


14677 


347 








LEM 




14700 


066 £55 


056 


032 




HL 


PKTADR+1 


14704 


337 








LDM 




14725 


106 152 


03£ 






CALL 


i^TPKT 


14710 


3t2£ 








LAC 




14711 


004 002 








AD 


P 


14713 


340 








i FA 




14714 


106 364 


036 






CALL 


DECHL 


14717 


106 364 


036 






CALL 


DECHL 


14722 


250 








xRA 




14723 


007 






! BACK 


RET 

LP A^^D 


DECREMEN 


14724 


106 041 


033 




DECRTC; 


CALL 


BKSP* 


14727 


106 016 


033 




DCCRTC; 


CALL 


t^IT$ 


14732 


066 365 


056 


031 




HL 


RTC 


14736 


307 








LAM 




14737 


024 001 








SU 


1 


14741 


370 








LMA 




14742 


066 £54 


056 


032 




.HL 


PKTACR 


14746 


347 








i FM 




14747 


(W. £55 


056 


032 




HL 


PKTADR+1 



SAVE THE BYTE 



DECREMENT THE BUFFER LENGTH COUNT 



DO NEXT BVTE IF NOT ZERO 
CALCLLATE NUMBER OF SHIFT MOD 8 



SHIFT CIRCULATING PARI TV BACK THAT MANV' 



STORE the: CIRC. PARI TV 

STORE THE xOR PARI TV 

(^T THE PACKET PARAMETERS AGAIN 



INIT THE BUFFER LENGTH 

COMPENSATE FOR THE TNO PARI TV ACCUMS 

PUT LENGTH IN E-REGISTER 

BACK LP BUFFER POINTER TO PARI TV ACCUMS 

RETURN WITH ZERO CONDITION TRUE 



THE RE-TRV COUNT 

BACK UP ONE RECORD 

WAIT FOR IT 

DECREMENT THF RE-TRV COUNT 



RESTCM: THE PPCHET ADDRESi 
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H.S.P, 



14753 337 

14754 007 



14755 066 365 056 031 

14761 006 003 

14763 370 

14764 007 

14765 000 



14766 106 152 03£ 
14771 106 310 033 
14774 007 



14775 106 15£ 03£ 
15000 106 056 033 
15003 007 



15004 106 15£ 03£ 

15007 106 041 033 

1501£ 106 016 033 

15015 007 



15016 


3£0 




15017 


353 




1S0P0 


364 




l'=fi'Pl 


046 


£57 036 03£ 


150pc; 


104 


037 03£ 


15030 


■3Pei 




15031 


353 




1503£ 


364 




15fi83 


046 


£60 036 032 


15037 


307 




15040 


£60 




15041 


160 


£47 032 


15044 


074 


010 


15046 


1£0 247 0;SP 


15251 


00£ 




1505£ 


204 




15253 


360 




15054 


303 





LDM 
RET 

INITIATE THE RE-TRV COUNT 



RTCI ; 



HL 
LA 
U^ 
RET 



RTC 
3 



SET THE RE-TRV COUNT TO THREE 



RTC; DC RE-TRV- COLNT STORAiGE 

. POSITION TO THE END OF THE FILE 



PEOFx: 



CALL GETPKT 
CALL PEF$ 
RET 



POSITION TO THE BEGINMING CF THE FILE CAFTER FILE NUMBER RE 



PBOFx: 



CALL GETPKT 
CALL PBF$ 
RET 



. BACKSPACE ONE RECORD 

BSPx; CALL GETPKT 

CALL BKSP$ 

CALL WAIT* 
RET 

. CHPt-*3E R-h'SICfL. DEVICE NLMBER 



CPDNx'; 



LCA 

LHD 

LLE 

DE 

JMP 



LFT 
CLFT 



SAVE THE PEN 



INIT THE LFT INDEX 
THE REST IF LIKE CPFN* 



CHmC^ PHVSICAL FILE NUMBER 



CPFNX; 



CLFT: 



LCA 

LHD 

LLE 

DE 

LAM 

QRA 

JTS 

JFS 
SLC 
ADE 
LLA 
LAD 



LFT+1 



GDFNER 

8 

GDFNER 



SAVE THE PEN 

INIT THE LFT INCEx 

GET THE LOGICAL FILE NUMBER 

CHECK IT-S Rft-liX 
INDEX INTO THE LFT 



page: 
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15(255 


014 


000 






15257 


350 








lSf5ftP5 


372 








ISfJfil 


007 








lSt7iV> 


106 


041 


033 




ISfKS 


106 


016 


033 




15070 


064 


001 






15072 


012 








15073 


007 








15074 


106 


016 


033 




150//' 


064 


001 






15101 


007 








1510S 


006 


004 






15104 


066 


150 


056 


0:>p 


15110 


004 


100 






15112 


37^ 








15113 


066 


125 


056 


mp 


15117 


106 


151 


036 




15122 


104 


064 


000 




151ffi 


011 


000 


013 


013 


15150 


040 015 







2200 OPERATING SVSTEM - 02/05/71 - FILE HWDLING ROUTINES 



H.S.P, 



PC 

LHA 
LMC 
RET 

! END ACTION RETL/RN POINTS 

FEACT; CALL fiKSP* 

CALL t4^IT* 

C« 1 

SRC 

RET 

TEACT; CALL miT$ 

OR 1 

RET 

PEACT; LA 4 

! INTERhWL ERROR HANDLER 



C)-*:¥^JGE THE PEN 



BACK UP TO THE END OF FILE 

WAIT FOR IT 

SET THE CARRV TOGGLE 



HPiIT FOR RECORD TO FINISH 
TVPE ERROR RETLIRNS NON-ZERO 

INTERNAL ERRC« D IF PARI TV ERROR 



ERRx; HL ERRS 

AD 'A-'-l 
LW 

HL ERRMSG 

CALL DSPLV* 

JMP BOOT$ 

ERRMSG; DC 011-0.013. 11. -'INTERfN*^ ERROR 

ERRS: DC •• '.015 



GET THE DEVICE NUMBER IN THE B REGISTER 

THE PHYSICAL FILE ^JUMBER IF 'PFN' 

THE LENGTH IN THE C REGISTER 

THE BUFFER STARTING ADEftESS IN HL 



15152 


066 


254 


056 


032 


GETPKT: HL 


PKTADR 


15156 


374 








LME 




15157 


066 


255 


056 


032 


HL 


PKTADR+1 


15163 


373 








LMD 




15164 


353 








LHD 




15165 


364 








LLE 




15166 


307 








LAM 




15167 


260 








QRA 




15170 


160 


247 


032 




JTS 


GDFNER 


15173 


074 


010 






CP 


8 


15175 


120 


247 


032 




JFS 


GDFNER 


15200 


002 








SLC 




15201 


004 


257 






AD 


LET 


1S203 


SPi^i 








LLA 




1SP04 


006 


03£ 






LA 


LFT>8 


15206 


014 


000 






AC 





15210 


350 








LHA 




15211 


317 








LBM 




15212 


106 


353 


036 




CALL 


INCHL 


15215 


327 








LCM 




15216 


066 


256 


056 


032 


HL 


PEN 



SAVE THE PACKET ADDRESS 

GET THE LOGICPL FILE NUMBER 

CATCH L0I3ICAL FILE f-JUMBER OUT OF RANGE 

INDEX INTO THE LOGICAL FILE TABLE 



i3ET THE r€?/ICE NLfJBER IN THE B REGISTER 

GET THE PHV'SICAL FILE hfi IN Th^ C REG 
SAVE IT IN CORE 
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H.S.P. 



±cpc>P 


372 


1SPP3 


353 


lcpP4 


364 


1S^^5 


106 353 0:36 


15230 


347 


15231 


106 353 036 


15234 


337 


15235 


106 353 036 


15240 


327 


15241 


353 


15242 


364 


15243 


106 334 032 


15246 


007 


15247 


006 010 


1S?>S1 


104 047 030 


1*VS4 


000 000 


lS?>Sfi 


000 


15257 


000 000 


15261 


001 000 


15263 


002 000 


15265 


001 001 


15267 


002 000 


15271 


02e 001 


15273 


000 000 


15275 


001 040 


15277 


305 


15300 


316 


15301 


066 332 056 032 


15305 


370 


15306 


066 333 056 032 


15312 


371 


15313 


361 


15314 


350 


15315 


007 


15316 


066 332 0S& 032 


15322 


307 


15323 


066 333 056 032 


15327 


367 


15330 


350 


15331 


007 


15332 


000 000 





LMC 
LHD 






LLE 






CALL 


INCHL 




LEM 






CALL 


IJnCHL 




LDM 






CALL 


INCHL 




LCM 






LHD 






1 1 F. 






CALL 


ADR* 




RET 




GDF/CRr 


LA 


8 




J^f^ 


ERR* 


PKTftDR: 


DA 





PFNi 


DC 





', cpERi^Tim System lo 


LET: 


DC 


0.0 




DC 


1.0 




DC 


2.0 




DC 


1>1 




DC 


2.0 




DC 


2,1 




DC 


0.0 




DC 


1.32 


'. UTILITV ROJTINES 


SAVHL; 


LAH 
1 RL 






HL 


HLSAV 




LMA 






HL 


HLSAV+1 




U-1B 






n R 






LHA 






RET 




RESHL; 


HL 
LAM 


H_SAV 




HL 


HLSAV+1 




LLM 






LHA 






RET 





*3ET THE BLFFER STARTIf^G ftCiDPtlSS 



GET ThE LEt-rJTH 
PUT THE BSA IN HL 

SELECT THE PROPER PHVSICAL DEVICE 

LCGICAL FILE NLWBER OUT OF RANGE NETS 
VOU AN I;^iTER^JAL ERROR r-*>jBER EIC^T 

CURRENT PPCKET ADDRESS STCRAGE 
CURRENT PHVSICAL FILE l^4LtBER STORAGE 

"ILE TABLE 

LF0 IS A /N/LLL DEVICE 

LFl FOR EECK 1 

LF2 FCR DECK 2 

LF3 IS CTOS CATALOG 

LF4 IS CTOS DATA SOURCE FILE 

LF5 IS CTOS DATA OBJECT FILE 

LF7 iS ASM OBJECT SCRATCH FILE 



15334 006 360 



HLSAV; DA 
, CmSETTE MECHANISM DRIVER 
ADR$,' LA 0360 



ADDRESS THE CASSETTE MECHANISM 



PAGE 
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15336 


121 






15337 


301 






153^ 


074 


001 




15342 


150 


357 032 


15345 


074 


mR 




15347 


150 


361 


032 


15352 


006 


001 


• 


15354 


104 


047 


030 


15357 


155 






15360 


007 






15361 


157 






15362 


007 






15363 








15363 


123 






15364 


101 






15365 


044 


024 




15367 


150 


363 


032 


15372 


002 






15373 


0PP 






15374 


002 






15375 


002 






15376 


043 






15377 


125 






15400 


101 






15401 


007 






15402 








i54ee 


123 






15403 


101 






15404 


044 


011 




15406 


150 


002 


033 


15411 


012 






15412 


043 






15413 


:303 






15414 


127 






15415 


007 






15416 








15416 


026 


001 




15420 


12^3 






15421 


101 






15422 


242 






15423 


150 


02£ 


ms 


15426 


007 






15427 








15427 


106 


016 


033 



2200 OPERATING SJYSTEy^ - 02/05/71 - FILE HANDLI^•JG ROJTINES 

SELECT THE PROPER DECK 

BAD DEVICE NLMBER IS ERROR '-A-- 
SELECT DECK ONE 
SELECT DECK THC' 



H.B.P. 





EX- 


ADR 




LAB 






CP 


1 




JT2 


DEKIAD 




CP 


2 




JT2 


DEK2AD 




LA 


1 




JHP 


ERR$ 


DEKIAD: 


Ex 
RET 


DECKl 


DEK2AD.- 


Ex 
RET 


DECKS- 


. READ 


A CHARACJLR 1/ 


READ*; 






rFKRED; 


Ex 
IN 


STATUS 




ND 


0£H 




JTZ 


DEKRED 




SLC 






SLC 






SLC 






SLC 






RTC 






Ex 


DATA 




IN 






RET 




! WRITE 


: A CKttRACTER / 


/•JRITE$; 






rCKWT; 


Ex 
IN 


STATUS 




ND 


011 




JTZ 


DEKWRT 




SRC 






RTC 






LAD 






EX- 


WRITE 




RET 




WAIT*; 






DEKWAT: 


LC 


1 


WAIT; 


Ex 
IN 
NDC 


STATUS 




JIZ 


l-JAIT 




RET 




'. FIRE 


LP BLO 


CK READ 


RBK$; 






rrKRBK:: 


CALL 


DEKi-JAT 



WAIT FOR IRG OR READ READV 



QUIT IF INTER-RECCf^D GAP 
ELSE (^T THE CHARACTER 



ERROR IF DECK READy' 
WRITE The DATA 



WAIT FOR DECK READV 



WAIT FOR THE ECCK TO BE READV 



Pf¥3E 34 



££00 OPERATING SV3TEM - 0£/05/71 - FILE HANDLIhG ROUTINES 



H.S.P, 



1543£ 


161 






Ex 


R"BK. 


15433 


007 






RET 










.' FIRE 


LP SLOCK WRITi 


15434 






wbk:*; 






15434 


106 


016 033 


FFKWBK; 


CALL 


DEKWAT 


15437 


163 






Ex 


WBK 


15440 


007 






RET 










. BACKi 


PACE cm: RECa 


15441 






&<SP$: 






15441 


106 


016 033 


rFKBSP; 


CALL 


DFKWAT 


15444 


167 






Ex 


BSP 


15445 


007 






RET 










'. REWIND THE 


TAPE 


15446 






REWND*; 






15446 


106 


016 033 


DEKREW: 


CALL 


im<:HftT 


15451 


175 






Ex- 


REHND 


15452 


106 


016 033 




call 


DEKf^AT 


15455 


007 






RET 










'. POSITION TO 


THE BE( 


15456 






PBF*: 






15456 


106 


016 033 


DEKPB^; 


call 


rFHi^T 


15461 


066 


PSB 056 03£ 




HL 


PFN 


15465 


317 






LBM 




15466 


173 






Ex- 


SB 


15467 


104 


131 033 




wT-P 


BWAIT 


1S47£ 


106 


333 033 


BBACK; 


CALL 


DFKBTP 


15475 


106 


355 033 




CALL 


IXIKFNS 


15500 


104 


111 033 




Jt-P 


FSKIP 


ISSiTS 


106 


355 031 


FNExT; 


CfL.L 


RTCI 


1SS06 


106 


375 033 




CALL 


DFKFNN 


15511 


303 




FSKIP: 


LAD 




1551£ 


£71 






CPB 




15513 


160 


103 033 




JT3 


FNEXT 


15516 


150 


£74 033 




JT2 


DEKTHE 


ISS^l 


106 


333 033 




CALL 


TFKSTP 


15SP4 


006 


007 




LA 


7 


1SSP6 


104 


047 030 




JMP 


ERR* 


15531 


106 


355 031 


BWAIT: 


CAi ( 


RTCI 


15534 


0£6 


006 




LC 


6 


15536 


106 


0^0 033 




C«LL 


WAIT 


15541 


044 


00£ 




ND 


£ 


15543 


110 £56 033 




Jf-/ 


BSTCP 


15546 


365 




BREAD; 


UH 




15547 


354 






LhE 




15550 


343 






LED 





FIRE UP THE READ BLCCK 



WAIT FCf!: THE DECK TO BE READY' 
FIRE cp BLOCK WRITE 



WAIT FOR ANV PREVIOLS OPERATIONS 
GET THE DESIRED FILE NUMBER 

START SEARCHING BACKWARDS 



STCP THE TAPE 

SEARCH FOR A FILE MARKER 

INITIALIZE THE RE-TRV COUNT 
SEARCH FOR NExT FILE MARKER 
SEE IF WE ARE THERE VET 

STILL FURTHER TO GO 
WE ARE THERE 
ELSE STOP THE T/¥>E 
ERROR Exit SEVEN 

INITIALIZE THE RE-TRV COLNT 
WAIT FOR READ REAOV OR LEADER 



CATCH LEADER 

PUSH THE CHARACTER ONTO THE STACK 



p(¥se: 


35 




ISSSl 


330 




ISSiSP 


106 


363 032 


issss 


100 


146 033 


15560 


304 




ISSfil 


254 


377 


15563 


273- 




lS5fi4 


110 


256 033 


15567 


074 


303 


15571 


150 


131 033 


15574 


074 


•347 


15576 


150 


131 033 


ISfipJl 


074 


201 


I'SfifJS 


110 


256 033 


15fi(?36 


306 




15607 


054 


377 


15611 


275 




15612 


110 


256 033 


15615 


046 


000 


15617 


0:^ 


010 


15fi?l 


305 




1S(=¥>P 


012 




15fii>3 


350 




15fi£4 


304 




ISftPS 


210 




l'W>6 


340 




15627 


303 




156;^ 


024 


001 


15632 


330 




15633 


110 


221 033 


15636 


304 




15637 


271 




15&40 


160 072 033 


15643 


110 


131 033 


15646 


106 


333 fiSS 


15651 


161 




1565P 


106 


016 033 


15855 


007 




15656 


106 


333 033 


15661 


161 




1566P 


106 


341 033 


15665 


160 


070 034 


15670 


173 




15671 


104 


146 033 


15674 


106 


333 033 


15677 


167 




15700 


106 


016 033 


15703 


161 




15704 


106 


016 033 


15707 


007 




15710 






15710 


im 


355 033 



2200 OPERATING SVBTO't - 02/05/71 - FILE HANDLING ROUTINES 



H.3.P, 



LDA 

CALL 

JFC 

LAE 

XR 

CPD 

JFZ 

CP 

JTZ 

CP 

JTZ 

CP 

JFZ 

LAL 

^R 

CPH 

JFZ 

LE 

LD 

FLIP; LAH 
SRC 
LHA 
LAE 
ACA 
LEA 
LAD 
SL' 
LEA 
JFZ 
LAE 
CPB 
JTS 
JFZ 
CALL 
Ex 
CALL 
RET 

SSTOP: CALL 
Ex 
CALL 
JTS 
Ex 
JMP 

DEKTHE; CALL 
Ex 
CALL 
EX- 
CALL 
RET 



DEKRED 
BREAD 

0377 

BZJQP 
0303 
BWAIT 
0347 

BhiHiT 
0201 

micp 

0377 

ESTOP 




1 
FLIP 



BBACK 

BmiT 

EEKSTP 

RBK 

DEKWAT 

DE^STP 

RBK 

DCKRTC 

DEKBAD 

SB 

BREAD 

DEKSTP 

BSP 

DEKWAT 

KfiK 

DEKi^T 



GET THE NExT RECORD CB¥cACTER 

GET THE SECOND RECORD CHARACTER 

UN-COMPLEMENT IT 

SEE IF IT MATCHES THE FIRST 

IGN^E NUMERIC RECORDS 

IGNORE SVMBOLIC RECORDS 

ELSE IT MUST BE A FILE MARKER 

GET THE FILE NUMBER COf-PuE^ENTED 

IT MUST WTCH THE FILE f^«jMBER 

FLIP OV^'ER THE FILE NUMBER 



compare it to the desired file t-u-iber 

he must go in the other direction 

we aren-t back far enough 

else stop the tape 

position to after the file label 

wait for it 

And quit 

stop the tape 

trv that record a3ain 

DECR£h£NT ThE RE-TRY COUNT 
QUIT IT TOO MANV' RE-TRIES 
RE- INITIATE BACK^WRD MOTIO^V 

STCP THE TAPE 

APPROACH THE GAP FROM FORhARD DIRECTION 



A^JD QUIT 



. POSITIC^V TO THE END OF THE FILE 



KF$: 

DEKPET: CALL DEKFNS 



St ARCH FOR THE NExT FILE MAR-KER 
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H.S.P. 



15713 


106 


333 


033 


15716 


167 






15717 


106 


016 


033 


157££ 


167 






157£3 


106 


016 


033 


157£6 


161 






157£7 


106 


016 


033 


1573£ 


007 






15733 


177 






15734 


106 


016 


033 


15737 


007 







15740 167 

15741 106 016 033 
15744 066 365 056 031 

15750 307 

15751 024 001 

15753 370 

15754 007 



CALL DEKSTP 

Ex fiSP 

CALL DEKWAT 

Ex BSP 

CALL DlKW^T 

Ex R'fiK 

CALL I^KWAT 
RET 



STOP THE TAPE AND f^-SELECT THE PROPER DECK 



STOP THE TAPE 

POSITION IT TO AFTER ThE LAST RECORD 

IN A FORWARD DIRECTICN 



DEKSTP; EX TSTCP 

CALL OEKWAT 
RET 



STOP THE TAPE 

WAIT FOR IT TO STOP 



. BACK LP THE TAPE AND DECROCNT THE RE-TRV' CC-UNT 

DEKRTC: Ex BSP 

DCKRTC: CALL DEKWAT 

HL RTC 

SO 1 

LMA 

RET 



. SEARCH FORHWRD FOR A FILE MfiRKER 



15755 


106 


355 031 


15760 


106 


016 033 


15763 


171 




15764 


104 


375 033 


15767 


106 


363 03£ 


15772 


100 


367 033 


15//b 


0£6 


004 


15/// 


106 


0£0 033 


1600E 


106 


363 03£ 


16005 


330 




16006 


106 


363 03£ 


16011 


054 


377 


16013 


£73 




16014 


110 


057 034 


16017 


074 


303 


IfiePl 


150 


367 033 


ie0£4 


074 


347 


160£6 


150 


367 033 


16031 


074 


£01 


16033 


110 


057 034 


16036 


106 


363 03£ 


16041 


330 




1604£ 


106 


363 03£ 


16045 


054 


377 


16047 


£73 




16050 


110 


057 034 


16053 


106 


363 03£ 



DEKFNS; CALL 
DEKFm-. CALL 
EX 
JHP 
DEKENI-J: CALL 

DEKFNN: LC 

CALL 

CALL 

LDA 

CALL 

xR 

CPD 

JF2 

CP 

JTZ 

CP 

JTZ 

CP 

JTZ 

CPLL 

LDA 

CALL 

xR 

CPD 

JTZ 

CALL 



RTCI 

DEKWAT 

SF 

DEKFNN 

DEKRED 

4 

WAIT 

DEKfCD 

TX.HF!£.D 
0377 

DEKFNE 

0303 

DEKFNW 

0347 

DEKFNW 

0S01 

DEKFNE 

DEKRED 

DEKRED 
0377 

DEKFNE 
DEKRED 



INITIATE THE F^-TRr' CCUNT 
WAIT FOR ThE DECK TO BE READV 
STPRT FORWARD MOTION 
INSPECT THE NEXT f^CORD 
WAIT FOR BLOCK TO BE OVER 

WAIT FOR DATA 

GET THE RECORD TVPE 

SAVE THE CHARACTER 

GET THE RECORD TVPE COMPL£>f:NTED 

LW-CC-MPLEMENT IT 

THEV MUST MATCH 

IGNORE NON-FILE MARKERS 



ELSE IT MUST BE A FILE MARKER 

GET THE FILE NLMBER 

SAVE IT 

GET THE FILE NUMBER COMPLEMENTED 

UN-COMPLE^^ENT IT 

THEV MUST MATCH 

THIS ML'ST BE THE END OF ThiE RECORD 
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H.S.P. 



16056 


043 








RTC 




16057 


106 


333 


033 


n^K^^E; 


CALL 


nFKSTP 


1606£ 


106 


■340 


033 




CALL 


nPKRTC 


16065 


120 


360 


033 




JFS 


nFKFNA 


16070 


WiF, 


002 




PFKBAD; 


LA 


2 


1607£ 


104 


047 


030 




JMP 


ERR* 










.' SPECIAL TAPE ROUTII 


16075 


106 


152 


032 


TRHx; 


CALL 


<3L(PKT 


16100 


301 








LAB 




16101 


074 


IPiPiP 






CP 


2 


16103 


006 


001 






LA 


1 


16105 


110 


047 


030 




JF2 


ERR* 


16110 


106 


046 


033 




CALL 


REHND* 


16113 


007 








RET 




16114 


106 


152 


032 


'ihhRx: 


CALL 


GETPKT 


16117 


106 


355 


033 


TRWFNR; 


ca; i 


DEKFNS 


16122 


106 


333 


(2G3 




CALL 


DEKSTP 


16125 


3£3 








LCD 




16126 


007 








RET 




16127 


106 


152 


032 


/^^jHlx: 


CALL 


GLiPKT 


16132 


106 


016 


033 




CALL 


DEKWAT 


16135 


163 








EX 


J-JBK 


16136 


036 


201 






LD 


0201 


16140 


106 


002 


033 




CALL 


DEK^«T 


16143 


036 


176 






LD 


0176 


16145 


106 


002 


033 




CALL 


DEK^-JRT 


16150 


066 


256 


056 032 




HL 


PFN 


16154 


337 








LDM 




16155 


106 


0^^ 


053 




CAI/ 


DEKWRT 


16160 


303 








LAD 




16161 


054 


377 






xR 


0377 


16163 


3:j0 








LDA 




16164 


106 


exzE 


033 




CALL 


nPKWRT 


16167 


106 


016 


033 




CALL 


DEKHAT 


161 7e 


007 








RET 





STOP THE TAPE 

BACK UP AND COLNT TRV 

TRV AGAIN IF NOT ALREADV TOO MANV 

ELSE UsLQADABLE REiCO^D 



REWIND THE TAPE 



ONLV REWIND THE FRCNT DECK 



READ A FILE NUMBER 

FIND A FILE HARKER 

STOP THE TAPE AFTER IT 

PUT THE FILE NUMBER IN THE C REGISTER 



WRITE A FILE NUiBER 

FIRE UP A HRITE 

WRITE OUT THE FILE Mf^RKER 

WRITE OUT ITS COMPLEMENT 



WRITE OUT THE FILE NUMBER 
WRITE OUT ITS CQMPLu^ENT 

TERMIWTE THE i^ITE OPERATION 



DONE 
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H.S.P. 



16200 



SET 016200 



. ITSEV BITSEV DEBU3 



16200 


066 


273 


056 035 


DEBUG$* HL 


CURADR 


lft^04 


347 






1 FM 




16205 


066 


274 




LL 


CURADR+1 


16207 


337 






1 m 




16210 


026 


0(25 




LC 


5 


16212 


066 


306 




LL 


DSPADR+4 


16214 


106 


226 


035 


CALL 


CONBIN 


16217 


066 


273 




LL 


CURADR 


IPPPl 


347 






LEM 




IFPPP 


066 


274 




LL 


CURADR+1 


16224 


357 






LHM 




16225 


364 






HF 




16^P6 


347 






LEM 




18227 


036 


000 




LD 





16231 


026 


003 




LC 


3 


16233 


066 


313 


056 035 


HL 


DSPDAT+2 


16237 


106 


226 


035 


CALL 


CONBIN 


16242 


066 


275 




LL 


DISP 


16244 


106 


151 


036 


CALL 


DSPLV* 


16247 


066 


315 




LL 


INBUF 


16251 


026 


010 




LC 


8 


16253 


106 


000 


036 


CALL 


KEVIN* 


16256 


066 


315 




LL 


INBLF 


16260 


106 


155 


035 


CALL 


CONCCT 


16263 


074 


015 




CP 


015 


16265 


152 


355 


034 


CT2 


NEHADR 


16270 


074 


111 




CP 


'I-- 


16272 


152 


364 


12Q4 


CTZ 


INCADR 


1627S 


074 


104 




CP 


■D-- 


16277 


152 


002 


035 


CTZ 


DECADR 


16302 


074 


115 




(^ 


•'M-' 


16304 


152 


0P0 035 


CTZ 


MODIFV 


16307 


074 


056 




CP 


/ 


16311 


152 


031 


035 


CTZ 


ENiLR 


16314 


074 


114 




CP 


•'L-- 


16316 


152 


121 


035 


CTZ 


LSAVE 


16321 


074 


110 




CP 


-H- 


16323 


152 


144 


035 


CTZ 


HSAVE 


16326 


074 


107 




CP 


•G-' 


16330 


152 


111 


035 


CTZ 


GET 


16333 


074 


106 




CP 


'F- 


16335 


152 


101 


035 


CTZ 


FRONT 


16340 


074 


117 




CP 


•o-- 


16342 


150 


042 


012 


JTZ 


0S$ 


16345 


074 


103 




CP 


••c- 


16347 


150 


042 


035 


JTZ 


GOTO 


16352 


104 


200 


034 


JMP 


DESLG* 


16355 


066 


273 




NEWADR: LL 


CURADR 


16357 


374 






U^E 
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H.S.P. 



16360 
16362 
16363 
16364 
16366 
16367 
16371 
16372 
16374 
16375 
16377 
16*2S0 
16401 

i64ee 

16404 
16405 
16407 
16410 
16412 
16413 
16415 
16416 
16417 
16420 
16422 
16423 
16425 
16426 
16427 
16430 
16431 
16434 
16436 
16441 
16442 
16444 
16445 
16447 
16450 
16453 
16454 
16455 
16461 
16462 
16464 
16465 
16467 
16470 
16472 
16473 
16475 
16476 



066 

373 

007 

066 

307 

004 

370 

066 

307 

014 

370 

£50 

007 

066 

307 

024 

370 

066 

307 

034 

370 

250 

007 

066 

337 

066 

357 

363 

374 

007 

106 

256 

106 

007 

066 

374 

066 

373 

106 

300 

300 

066 

370 

066 

371 

066 

372 

066 

373 

066 

374 

104 



274 

273 
001 
274 
000 

273 
001 
274 
000 

273 
274 



020 035 
035 
364 034 

051 

052 

000 000 

370 056 035 

371 

372 

373 

374 

200 034 



LL 

L>JD 

RET 

INCADR; LL 
LAM 
AD 
LMft 
LL 
LAM 
AC 
LHA 
xRA 
RET 

DECADR; LL 
LAM 
SU 
LMA 
LL 
L^ 
SB 
LMA 
xRA 
RET 

MODIFV; LL 
LDM 
LL 
LHM 
LLD 

RET 
ENTER; CALL 
LH 
CALL 
RET 
GOTO; LL 
LME 
LL 
LMD 
BRANCH: CALL 
LSAVI ; LAA 



HSAVI : 



16501 016 001 



LAA 

hL 

LHA 

LL 

LMB 

LL 

LMC 

LL 

LMD 

LL 

LJ^ 

JMP 



FRONT; LB 



CLiRADR+1 

CLRADR 
1 

CURADR+1 


CURACR 
1 

CLRADR+1 


CLRADR 
CURACR+1 



MODIFY 

CURADR>S 

INCADR 

BRANCH+1 

BRANCH+2 



ASAVE 

BSAVE 

CSAVE 

DSAVE 

ESAVE 

DEBUG$ 

1 



PAGE 


40 
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ip.'^e 


106 


112 


000 




CALL 


LC-AEe* 


iF.<^^je 


104 


115 


035 




a-p 


GLiLOD 


iSSll 


314 






r^l: 


LBE 




16512 


106 


100 


000 




CAil 


LOAD* 


16515 


053 






y^Ti-QU; 


RTZ 




16516 


151 








Ex 


BEEP 


16517 


^»5/3 








xRA 




165P0 


007 








RET 




IfiSPl 


066 


053 


056 035 


LSAVE; 


HL 


LSAVI 


Ifi'VS 


016 


306 






LB 


0306 


16527 


304 






HLSAVM: 


LAE 




16530 


044 


007 






ND 


7 


16532 


IPieP 








SLC 




16533 


0BE 








SLC 




16534 


(VP 








SLC 




16535 


074 


070 






CP 


070 


16537 


0^3 








RFS 




16540 


261 








ORB 




16541 


370 








LMA 




16542 


^*50 








xRA 




16543 


007 








RET 




16544 


066 


054 


056 035 


HSAVE; 


HL 


HSAVI 


16550 


016 


305 






LB 


0305 


16552 


104 


127 


035 




Jr-P 


hLSAvM 










'. CON'/ERT OCTAL TO B. 


16555 


036 


0PJ0 




CONOCT: 


LD 





16557 


343 








LED 




16560 


317 






CQNLCF; 


LSM 




16561 


106 


353 


036 




CALL 


It-CHL 


16564 


301 








LAB 




16565 


074 


070 






CP 


•■S-- 


16567 


££3 








RFS 




16570 


074 


060 






CP 


■•0-- 


16572 


063 








RTS 




16573 


044 


007 






ND 


7 


16575 


320 








LCA 




16576 


303 








LAD 




16577 


044 


037 






ND 


037 


16601 


0ep 








SLC 




16602 


em> 








SLC 




16603 


(TffP 








SLC 




16604 


•330 








LDA 




16605 


304 








LAE 




16606 


002 








SLC 




16607 


002 








SLC 




16610 


002 








SLC 




16611 


340 








1 FA 




16612 


044 


007 






ND 


7 


16614 


263 








ORD 





DEBLG RC-UTINE 



H.S.P. 
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H.S.P. 



16615 


330 




16616 


304 




16617 


044 


370 


16621 


262 




16622 


■340 




16*V>3 


104 


160 035 


16626 


304 




16627 


044 


007 


16631 


004 


060 


16633 


370 




1663^^ 


106 


364 036 


16637 


304 




16640 


012 




16641 


012 




16642 


012 




16643 


044 


037 


16645 


340 




16646 


303 




16647 


012 




16650 


012 




Ififim 


012 




lfi6S^ 


3-30 




16653 


044 


•340 


1665S 


264 




16656 


340 




16657 


•30:3 




16860 


044 


037 


1666^ 


330 




16663 


302 




16664 


024 


001 


166F« 


320 




16667 


110 


226 035 


16672 


007 





16673 000 000 

16675 011 000 013 013 

167eE 040 040 040 040 

16711 040 040 040 015 

16715 040 040 040 040 

16770 

16770 000 

16771 000 

16772 000 

16773 003 

16774 000 

16775 001 002 



LDA 




LAE 




ND 


0370 


ORC 




LEA 




JMP 


CONLQP 


', CO^/ERT BINARV TO OCTAL iRIG 


CONBIN: LAE 




ND 


7 


AD 


•■0' 


Lm 




CALL 


DECH- 


LAE 




SRC 




SRC 




SRC 




ND 


037 


LEA 




LAD 




SRC 




SRC 




SRC 




LDA 




ND 


0340 


ORE 




LEA 




LAD 




ND 


037 


LDA 




LAC' 




SU 


1 


LCA 




JTZ 


ca^iN 


f^T 




'. STCiRAGE 




CURADR; DA 





DISP; EC 


011. 0-013> 11-021 


DSPADR: DC 




DSPDAT.' DC 


-015 


INBLF; DC: 




SET 


016770 


ASAVE.' DC' 





BSAVE; DC: 





CSAIC: DC 





DSAVE; DC 





ESAVE; DC: 





DC 


1.2 



I'RIGHT TO LEFTJ 



DONE 
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170(30 



17000 


006 


341 




KEVIN** 


■ LA 


0341 


17002 


121 








Ex 


ADR 


17003 


312 








I BC 




17004 


0(?56 


0£0 






LA 


020 


17006 


131 








Ex 


CQMl 


17007 


106 


326 


036 


KILCCPi 


CAI i 


CWAIT 


17012 


123 






KHLOa^: 


Ex 


STATUS 


17013 


101 








IN 




17014 


044 


0(2e 






ND 


2 


17016 


150 


012 


036 




JT2 


KHLOOP 


170ei 


125 








Ex 


mm 


17l?pi> 


101 








IN 




170E3 


074 


010 






CP 


010 


170^5 


150 


105 


036 




JT2 


KfiSP 


17030 


074 


030 






CP 


030 


170i^ 


150 


113 


036 




JTZ . 


KDEL 


17035 


074 


100 






CP 


0100 


17037 


160 


044 


036 




JTS 


KSTORE 


1704£ 


054 


040 






XR 


040 


17044 


370 






KSTQPE: 


LMA 




17045 


074 


015 






CP 


015 


17047 


150 


lee 


036 




J\Z 


KEND 


17052 


127 








Ex 


iHRITE 


17063 


303 








LAD 




17fiE4 


074 


117 






CP 


79 


17056 


120 


007 


036 




JFS 


KILCOP 


17061 


301 








LAB 




17062 


024 


001 






SU 


1 


17064 


160 


007 


036 




JTS 


KILOOP 


17067 


310 








1 m 




17070 


303 








LAD 




17071 


004 


001 






AD 


1 


170/^3 


■330 








LDA 




17074 


106 


353 


036 




CALL 


INCHL 


17077 


104 


007 


036 




JMP 


KILOCP 


17102 


250 






KEND: 


xRA 




17103 


131 








Ex 


COMl 


17104 


007 








RET 





SET 017000 

kevbcard entrv rc4.itine 

accepts a string of characters from the kevbcfard and puts 
them in t-emorv starting with the address given in the h 
and l registers fm) at a displav positic^n described bv the 
d chc-rz'j and e i'vertl' registers. the maximlh nlmber cf 
characters accepted is taken frcm the c register upon entrv' 
overflow off the end of a displav line is not permitted 
and if either the maximln colmt or dispi-av boundarv is 
Exceeded, successive ch^acters will go in the. last 

POSITION O^'ER AND C^'ER. AN 015 WILL TERMI/nATE INPUT REQUEST 
THE CLRSOR IS TURNED ON LPON ENTRV AND CFF UPON ExIT. 



ADDRESS THE KEVBCipfiD 

LOAD THE MAX COUNT INTO THE CURRENT COUNT 
TLRN ON THE CLRSOR 

MAKE SURE THE DISPLAV IS READV 
CXIT A ChiPfkfCTER FROM THE KEVBOARD 



CATCH Bi:¥:HSPf¥2E 

CATCH DELETE 

REVCRSE THE SHIFT KEV FUNCTION 



STORE THE CHARACTER 
CATCH THE ENTER KEV 

ELSE DISPLAV THE CHARACTER 
CATCH CURSOR AT SCREEN BOUNry¥?V 



DECREMENT THE CHARACTER COUNT 

ALREADV moVE THE Mf^IMUM 

BLMP THE CLRSOR POSITION FOR REAL 



BL^P THE MEMQRV LQACTIC-N 
DO THE NEXT CHARACTER 

TURN OFF THE CURSOR 
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17105 


106 


124 036 


KBSP: 


CPil 


KBSPR 


17110 


104 


007 036 . 




JMP 


KILOQP 


17113 


106 


124 036 


Km ; 


CftLL 


KBSPR 


17116 


110 


113 036 




JFZ 


KDEL 


171£1 


104 


007 036 




JHP 


KILOCP 


17124 


301 




KBSPR: 


LAB 




17125 


272 






CPC 




17126 


053 






RTZ 




17127 


004 


001 




AD 


1 


17131 


310 






LBA 




171-32 


303 






LAD 




17133 


e^4 


001 




SU 


1 


17135 


330 






Lm 




17136 


106 


364 036 




CA/ 1 


DECHL 


17141 


106 


326 036 




CALL 


CWAIT 


17144 


eim 


040 




LA 


040 


17146 


127 






Ex- 


WRITE 


17147 


260 






CXkft 




17150 


007 






RET 





17151 


0I2S 


341 


17153 


121 




17154 


PS0 




17155 


131 




17156 


106 


326 036 


17161 


317 




17162 


106 


353 036 


17165 


301 




17166 


044 


177 



BACKSPACE OSE CHARACTER 

BACKSPACE TO THE! BEGINNING Cf THE ENTRV 



INCREMEf^T THE ChWRACTER' COL^TER 
UNLESS AT ThE BEGINNING OF THE ENTRV 



DECREMENT THE SCREEN POSITION 



DECRE^ENT THE MEMCRV POINTER 
MAKE SURE THE DISPLAV IS READV 
ERASE THE Ci-WRACTER 

RETURN WITH ZERO CONDITION FALSE 



CRT DISPLAV ROUTINE 

DISPLAVS A STRING OF CHARACTERS WHICH ARE IN MEMCRV STARTIN 
WITH THE mU^SS GIVEN IN THE H AND L REGISTERS fiND AT THE 
POSITION DESCRIBED BV THE D I'HORZ) Pt^ E iVERTi REGISTERS. 
OVERFLOW OFF THE END OF A LINE IS NOT PERMITTED. 
SPECIAL CC>NTROL CHARACTERS TERMINATE THE LINE AND ALLOW 
MOV^EMENT CF THE CURSOR- ERASURE Cf THE SCREEN OR LINE- 
AND ROLL-UP OF THE ENTIRE SCREEN. 



ENTRV VALUES: 



EXIT VALUE; 



CONTROL CHARACTERS: 



DSPLV** LA 

Ex- 

xRA 

Ex 



DOCOM: 
DLOOP; 



0341 
ADR 

COMl 



CALL CWAIT 
LBM 



CALL 

UAS 

ND 



INCHL 
0177 



D - HQRIZCfNTAL CURSOR POSITION C0 TO 79 
E - VERTICAL CLRSOR POSITION C0 TO 11.) 
HL - FIRST CHARACTER LOCATION IN STRII^ 
DE - CURSOR POSITION f^TER LAST CHAR 
HL - ^£MCRV LOCATION AFTER TERM CHAR 
003 - END OF THE STRING 

011 - A NEW HQRIZCiNTAL POSITION FCLLOWS 
013 - A NEW VERTICAL POSITION FOLLOWS 
015 - END OF LINE t'DCES CR/LF:> 

021 - ERASE TO THE END CF THE FRAf-C 

022 - ERASE TO THE END CF THE LINE 

023 - ROLL UP THE SCREEN a'-£ LINE 

PiDWESS THE DISPLAV 

TURN OFF THE CURSOR 

DO THE CC-NTROL CQH^WND 

MAKE SURE Th£ DISPLAV IS READV 

GET A CHARACTER FROM THE STRING 

BL'MP THE STRING POINTER 

CHECK FOR CONTROL CHmPCTERS 

STRIP Af^/V PARI TV 
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17170 


074 


003 






CP 


3 


171-?e 


150 


265 


036 




JTZ 


ENDOS 


17175 


074 


011 






CP 


011 


17177 


150 


■?im 


036 




JTZ 


R-CfiZ 


17££e 


074 


013 






CP 


013 


17304 


150 274 


036 




JTZ 


PV'ERT 


17207 


074 


015 




^ 


CP 


015 


17S11 


150 


£45 


036 




JTZ 


ENDOL 


17214 


074 


021 






CP 


021 


17216 


150 


307 


036 




JiZ 


EECf- 


17221 


074 


(V>^ 






CP 


022 


172S3 


150 


314 


036 




JTZ 


EEOL 


17226 


074 


023 






CP 


0£3 


17230 


150 


321 


036 




JTZ 


ROLLLP 


17^33 


127 








Ex 


WRITE 


17234 


303 








LAD 




17235 


074 


117 






CP 


79 


17237 


014 


000 






AC 





17241 


330 








LDA 




17242 


104 


156 


036 




JHP 


ELOCP 


17245 


036 


000 




ENDOL; 


LD 


.0 


17247 


304 








LAE 




17250 


004 


001 






AD 


1 


17^>SP 


340 








J FA 




17253 


074 


014 






CP 


12 


17255 


160 


265 


036 




JTS 


ENDOS 


17260 


046 


013 






LE 


11 


17262 


006 


010 






LA 


010 


17264 


131 








Ex 


CQMl 


17265 


106 


326 


036 


ENDOS; 


CALL 


CWAIT 


17270 


006 


020 






LA 


^'0 


17272 


131 








Ex 


COMl 


17273 


007 








RET 




17274 


347 






PVERT: 


LEM 




17275 


104 


301 


036 




JMP 


NCHAR 


17300 


337 






PH0R2; 


LDM 




17301 


106 


353 


036 


NCHffi!: 


CAii 


INCHL 


17304 


104 


156 


036 




JMP 


DLOQP 


17307 


006 


004 




EEICF: 


LA 


4 


17311 


104 


155 


036 




JMP 


DOCCiM 


17314 


006 


002 




EEOL; 


LA 


2 


17316 


104 


155 


0;:^ 




JMP 


DOCC»^ 


17321 


006 


010 




ROLLUP; 


LA 


010 


17323 


104 


155 


p-rSB 




JMP 


DCCQM 


17326 


123 






cmiTi 


Ex 


STATUS 


17327 


101 








IN 




17330 


012 








SRC 




17331 


100 


326 


036 




JFC 


cmiT 


17334 


303 








LAD 




17335 


260 








CRA 




17336 


063 








RTS 





- 02/05/71 - KEVBCARD & DISPLAY ROUTINES H.S.P. 

END CF STRING 

POSITION HORIZONTALLV 

POSITION VERTICALL'y 

END CF LINE 

ERASE TO THE END CF THE FRh4-IE 

ERASE TO THE END OF THE LINE 

ROLL LP THE SCREEN 
PUT OUT THE CHARACTER 
BLWP THE CLRSCR POSITia-^ 
UNLESS AT THE END OF THE LINE 



RETURN CLRSQR TO START OF NExT LINE 
BUMP THE LI^C COUNTER 



THERE IS RCOM FOR THE NEXT LINE 
ELSE KE^J" THE LINE COUNTER AT ELEVEN 
AND ROLL THE SCREEN LP ONE LINE 

MAKE SURE THE DISPLAY IS READY 
TURN ON THE CURSOR 

RETURN 

SET Th£ VERTICAL POSITia-V 

SET THE HORIZONTAL POSITION 

BUMP THE STRING POINTER TO THE NxT Chf^ 



WAIT FOR THE DISPLAY TO BE READY 



MAKE SURE CURSOR IS IN CORRECT POSITION 
PREVENT CLRSQR POSITIONS OUT Cf- RANGE 
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1733? 


074 120 


CP 


17341 


023 


RFS 


17342 


133 


Ex 


17343 


304 


LAE 


17344 


260 


ORA 


17345 


063 


RTS 


17346 


074 014 


CP 


17350 


023 


FFS 


17351 


135 


Ex 


1735£ 


007 


RET 


17353 


306 


INCH-* LAL 


17354 


004 001 


AD 


17356 


360 


i-LA 


17357 


305 


LAH 


17360 


014 000 


AC 


17V^- 


350 


LHA 


17363 


007 


RET 


17364 


306 


DECHL* LAL 


1736=; 


224 001 


SU 


17367 


:360 


1 1 A 


17370 


305 


LAH 


17371 


034 000 


SB 


17373 


350 


LW 


17374 


007 


RET 



80 



COME 



12 



COM3 



BL^^ MEMQRV POINTER UP 







Wt-P MEMCf^/ POINTER DC'Ht-^ 







DONE 
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LIBRARV- CATALOG 



i7Mm 










SET 017404 


17404 


mi 






cfiTm 


DC 037 


17405 


010 








DC 010 


17406 


340 






I 


DC 0340 


17407 


367 








DC 0367 


17410 








CAT* 


RPT 14 


17410 


040 


040 040 


040 




DC 


.' 


17420 


040 


040 040 


040 




DC 


/ 


17430 


040 


040 040 


040 




DC 


/ 


17440 


040 


040 040 


040 




DC 




174512 


040 


040 040 040 




DC 


•* 


17460 


040 


040 040 


040 




DC 


.* 


17470 


040 


040 040 


040 




DC 




17500 


040 


040 040 040 




DC 


.* 


17510 


040 


040 040 


040 




DC 


.* 


17S^ 


040 


040 040 040 




DC 


/ 


17530 


040 


040 040 040 




DC 


.• 


17540 


040 


040 040 


040 




DC 


,' 


17550 


040 


040 040 040 




DC 


.' 


17S6f3 


040 


040 040 040 




DC 


/ 


17570 


052 








DC 


*•• 


17571 


mm 






ALPFN* 


DC i 


3 










'. £M) OF PHVSK. 


y)L FILE 1 


17572 


040 040 040 040 


SVMBOL* 


DC 












'. LOPiD 


AND ExEC 


':UYE 


17601 


106 


100 000 




muTo** 


CALL L 


-OAD* 


17604 


100 


075 000 




MAUTO; 


JFC F 


?UN* 


17607 


104 


0(-4 0m 






cM= I 


SOOT* 


17612 


106 


112 000 




mJTBS^s:- 


CALL L 


-OAD^-* 


17615 


104 


204 037 






JMP ^ 


lAL'TO 










'. SVMBOLIC FILE 


: LOADER 


17ft=0 


353 






i-t.OPD$f,^* 


LHD 




17621 


364 








i 1 F 




17fiP^ 


046 


172 036 


037 




[x: i 


iVMBOL 


17626 


026 


00& 






LC i 


> 


17630 


106 


345 037 






CALL i 


3LKJi-K 


17633 


046 


010 036 


037 




DF t 


)AT 


17637 


106 


264 037 






Cf* 1. L 


.OOKLP 


17642 


074 


005 






CP l 


3 


17644 


013 








RF2 




17645 


306 








LAL 




17646 


044 


370 






ND £ 


3370 


XlPfV> 


024 


010 






Ski (. 


;at 



STATING ADDRESS FOR LOADER 
STPRTINB X'DRESS COMPLEMENTED 
SPACE FOR 14 ENTRIES 



AL'TO-LCAD RHV3ICAL FILE NUMBER 



ITEM SVMBOL ST0RAC5E 



LOAD THE GIVEN FILE 

EXECUTE IT IF GOOD LOAD 

EO-SE RE-LCAD THE QPERATII^JG SVSTEM 

LOAD DECK TWO FILE 



i^rr PACKET ADDRESS 

PUT THE /NiAf-E IN THE LOOKUP ITEM 

LOOK IT UP IN THE LIBRARY CATALOG 

SEE IF IT IS THE THE CATALOG 
2ERO FLAG FALSE IF IT ISN'T 
CALCULATE THE FILE NUMBER 
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17652 012 

17653 012 

17654 012 
176E5 004 00£ 
17657 310 

17660 106 100 000 

17663 007 



17664 

17665 

17666 

17671 

17675 

17676 

17701 

ITTJSe 

17726 

17706 

17707 

17711 

17713 

17714 

17717 

177£2 

17723 

17725 

17727 

17730 

17731 

17733 

17734 

17755 

17737 

17740 

17741 

17742 



17745 
17746 
17751 
17752 
17755 
17756 
17760 
17761 
17764 



SRC 

SRC 

SRC 

AD 2 

LBA 

CALL LOAD* 

RET 

SVMBOL LOOKUP ROUTINE 



FIRST ENTRV IS PHVSICAL FILE TWO 



353 

364 

104 

066 

327 

106 

307 

272 

110 

306 

044 

074 

£53 

106 

104 

306 

044 

004 

360 

305 

014 

350 

•307 

074 

063 

335 

346 

104 



334 037 
17e 056 037 

365 037 



322 037 

007 
005 

■365 037 
275 037 

370 
010 



000 



101 



271 037 



LOCKUP-^- LHD 
LLE 
JMP 

LOOKPU; HL 

LSLOOP; LCM 
CALL 
LAM 
CPC 
JF2 
LAL 
ND 
CP 
RT2 
CALL 
■JMP 

LDIFF: LAL 
ND 
AD 
LLA 
LAH 
AC 
LHA 

LST^T; LAM 
CP 
RTS 
LDH 
LEL 
JMP 



LSTART 
SVMBOL 

INCSNP 



LDIFF 

7 

5 

INCSHP 
LSLOOP 

0370 
8 




'A-- 

LOOKPU 



CHECX FIRST ENTRV IN TABLE 



GET THE ITEM STILTING PDLf^SS 
GET THE NEXT ITEM CHARACTER 
GET THE NEXT TABLE ADDRESS 
GET THE NEXT TABLE CHPfiPCTER 

THEV DON'T t-V^TO-i 

SEE IF AT THE END OF THE ENTRV 



THE ITEM HAS BEEN FOUND IF SO 

GET THE NEXT ITEM ADDRESS 

AND TRV THE NEXT CHARACTER 

BUMP THE TABLE POINTER TO NEXT ENTRV 



GET THE TABLE FIRST CHARACTER 
END OF TABLE IF IT IS NOT AL^^iA 

SfWE THE TABLE ADDRESS 

AND TRV NEXT TABLE ENTRV 



BLOCK TRANSFER FROH HL TO DE C CHARACTERS 



317 

106 365 037 

371 

106 365 037 

302 

024 001 

320 

110 345 037 

007 



BLKTFR* LBM 
CALL 
LMB 
CALL 
LAC 
SU 
LCA 
JF2 
RET 



INCSHP 
INCSHP 



BLKTFR 



GET A SOURCE CH:«ACTER 
GET NEXT DESTINATION LOCATION 
PUT IT IN fi DESTINATia^l LOCATION 
GET NEXT SOURCE ADDRESS 
DECREMENT THE COUNT 



DO NEXT CHf^ IF NOT ZERO 



17765 306 



. INCREMENT HL AND SmP IT WITH DE 
INCSWP* LAL 
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17766 004 aefl AD 1 

177750 364 UX 

17771 Sm LEA ' 

17772 305 LAH 

17773 014 000 AC 
17775 353 LHD 
1777B 330 LEA 
17777 007 RETT 

done: 



